Henrywood and Agarwal, Equation (9a)

Time bar (total: 5.3s)

start0.0ms (0%)

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

analyze475.0ms (9%)

Memory
9.3MiB live, 959.0MiB allocated; 131ms 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)

sample2.5s (47.3%)

Memory
-34.6MiB live, 2 334.4MiB allocated; 2.0s collecting garbage
Samples
925.0ms8 256×0valid
270.0ms2 933×0invalid
Precisions
Click to see histograms. Total time spent on operations: 759.0ms
ival-mult!: 339.0ms (44.6% of total)
ival-pow2: 155.0ms (20.4% of total)
ival-div!: 146.0ms (19.2% of total)
ival-sqrt: 90.0ms (11.9% of total)
ival-sub!: 27.0ms (3.6% of total)
adjust: 2.0ms (0.3% of total)
Bogosity

preprocess62.0ms (1.2%)

Memory
-52.5MiB live, 54.5MiB allocated; 32ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

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

series127.0ms (2.4%)

Memory
42.4MiB live, 169.0MiB allocated; 51ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePointExpression
27.0ms
l
@-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)
9.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)
5.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)

rewrite57.0ms (1.1%)

Memory
3.4MiB live, 60.7MiB allocated; 15ms 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

eval66.0ms (1.2%)

Memory
0.4MiB live, 88.5MiB allocated; 15ms collecting garbage
Compiler

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

prune14.0ms (0.3%)

Memory
-11.5MiB live, 33.7MiB allocated; 6ms collecting garbage
Pruning

11 alts after pruning (11 fresh and 0 done)

PrunedKeptTotal
New27611287
Fresh000
Picked101
Done000
Total27711288
Accuracy
89.3%
Counts
288 → 11
Alt Table
Click to see full alt table
StatusAccuracyProgram
66.9%
(*.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)
70.5%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
81.1%
(*.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)))))
65.7%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d))) (/.f64 h l)))))
70.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))))))))
1.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
71.3%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
12.6%
#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))
12.2%
#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))))))))
14.7%
#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))))))))
2.6%
#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)))))))))
Compiler

Compiled 668 to 516 computations (22.8% saved)

series197.0ms (3.7%)

Memory
25.6MiB live, 304.9MiB allocated; 72ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePointExpression
33.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 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)))) (sqrt (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l))) (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)) (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l) (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* 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) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))) (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))) 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)) (* (pow D 2) h) (pow D 2) 2 (* (pow d 2) l) (pow d 2))
26.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 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)))) (sqrt (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l))) (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)) (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l) (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* 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) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))) (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))) 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)) (* (pow D 2) h) (pow D 2) 2 (* (pow d 2) l) (pow d 2))
14.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 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)))) (sqrt (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l))) (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)) (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l) (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* 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) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))) (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))) 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)) (* (pow D 2) h) (pow D 2) 2 (* (pow d 2) l) (pow d 2))
8.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 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)))) (sqrt (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l))) (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)) (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l) (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* 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) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))) (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))) 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)) (* (pow D 2) h) (pow D 2) 2 (* (pow d 2) l) (pow d 2))
8.0ms
h
@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 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)))) (sqrt (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l))) (- 1 (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l)) (/ (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) l) (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* 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) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))) (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))) 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)) (* (pow D 2) h) (pow D 2) 2 (* (pow d 2) l) (pow d 2))

rewrite47.0ms (0.9%)

Memory
-26.8MiB live, 64.1MiB allocated; 11ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval49.0ms (0.9%)

Memory
1.0MiB live, 95.2MiB allocated; 28ms collecting garbage
Compiler

Compiled 15 179 to 1 990 computations (86.9% saved)

prune20.0ms (0.4%)

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

22 alts after pruning (20 fresh and 2 done)

PrunedKeptTotal
New31216328
Fresh246
Picked325
Done000
Total31722339
Accuracy
95.2%
Counts
339 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
66.9%
(*.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)
70.5%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
84.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))))
74.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
86.9%
(*.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)))))
81.4%
(*.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))))))
65.7%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d))) (/.f64 h l)))))
83.1%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
71.3%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
12.6%
#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))
13.4%
#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 h (*.f64 (*.f64 d d) l))))) w0) M))
13.0%
#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 (*.f64 D D) (*.f64 d d)) (/.f64 h l))))))))
14.4%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))) d)))))
17.4%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
1.6%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))) d))))))
2.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
6.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64)))))) l))))
2.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
2.6%
#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)))))))))
14.0%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (/.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)))
18.1%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
1.6%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.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))))
Compiler

Compiled 1 700 to 1 264 computations (25.6% saved)

series272.0ms (5.2%)

Memory
-3.7MiB live, 273.1MiB allocated; 50ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePointExpression
44.0ms
h
@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) (/ h (* (* d d) l))))) w0) M) (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) w0) (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (* -1/4 (* (* D D) (/ h (* (* d d) l)))) -1/4 (* (* D D) (/ h (* (* d d) l))) (* D D) (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* 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))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (neg (* 1/4 (/ h (* (pow d 2) l)))) (* 1/4 (/ h (* (pow d 2) l))) 1/4 (/ h (* (pow d 2) l)) (* (pow d 2) l) (pow d 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))))
34.0ms
d
@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) (/ h (* (* d d) l))))) w0) M) (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) w0) (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (* -1/4 (* (* D D) (/ h (* (* d d) l)))) -1/4 (* (* D D) (/ h (* (* d d) l))) (* D D) (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* 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))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (neg (* 1/4 (/ h (* (pow d 2) l)))) (* 1/4 (/ h (* (pow d 2) l))) 1/4 (/ h (* (pow d 2) l)) (* (pow d 2) l) (pow d 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))))
23.0ms
w0
@-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) (/ h (* (* d d) l))))) w0) M) (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) w0) (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (* -1/4 (* (* D D) (/ h (* (* d d) l)))) -1/4 (* (* D D) (/ h (* (* d d) l))) (* D D) (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* 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))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (neg (* 1/4 (/ h (* (pow d 2) l)))) (* 1/4 (/ h (* (pow d 2) l))) 1/4 (/ h (* (pow d 2) l)) (* (pow d 2) l) (pow d 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))))
18.0ms
w0
@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) (/ h (* (* d d) l))))) w0) M) (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) w0) (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (* -1/4 (* (* D D) (/ h (* (* d d) l)))) -1/4 (* (* D D) (/ h (* (* d d) l))) (* D D) (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* 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))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (neg (* 1/4 (/ h (* (pow d 2) l)))) (* 1/4 (/ h (* (pow d 2) l))) 1/4 (/ h (* (pow d 2) l)) (* (pow d 2) l) (pow d 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))))
17.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) (/ h (* (* d d) l))))) w0) M) (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) w0) (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (* -1/4 (* (* D D) (/ h (* (* d d) l)))) -1/4 (* (* D D) (/ h (* (* d d) l))) (* D D) (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* 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))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (neg (* 1/4 (/ h (* (pow d 2) l)))) (* 1/4 (/ h (* (pow d 2) l))) 1/4 (/ h (* (pow d 2) l)) (* (pow d 2) l) (pow d 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) -1 (* D (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))))

rewrite69.0ms (1.3%)

Memory
-30.7MiB live, 83.7MiB allocated; 66ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
081798
0121777
0409777
Stop Event
iter-limit
iter-limit
iter-limit
unsound
iter-limit
Counts
58 → 188
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 h (*.f64 (*.f64 d d) l))))) w0) M))
(*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) w0) M)
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) w0)
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))
#s(literal -1/4 binary64)
(*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 D D)
(/.f64 h (*.f64 (*.f64 d d) l))
(*.f64 (*.f64 d d) l)
(*.f64 d d)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
(*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
(*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
(*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
(sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
(*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(literal 1/4 binary64)
(/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))
(*.f64 (pow.f64 d #s(literal 2 binary64)) l)
(pow.f64 d #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
(*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
(*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(literal -1 binary64)
(*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
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 (*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64))) w0) M))
(*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64))) w0) M)
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64))) (*.f64 w0 M))
(*.f64 M (*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64))) w0))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64))) w0)
(*.f64 w0 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64))))
(*.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D))))
(pow.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64)))
(fabs.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64))))
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 D D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal -1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)))
(neg.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D)) #s(literal 1/4 binary64)))
#s(literal -1/4 binary64)
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (/.f64 h l))
(*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D))
(*.f64 (*.f64 (*.f64 D D) h) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 D (*.f64 D (/.f64 h (*.f64 (*.f64 d d) l))))
(/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)
(/.f64 (neg.f64 (*.f64 (*.f64 D D) h)) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 D D) h)))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
(*.f64 h (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(/.f64 (/.f64 h (*.f64 d d)) l)
(/.f64 (neg.f64 h) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 h (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) h))
(*.f64 (*.f64 d d) l)
(*.f64 l (*.f64 d d))
(*.f64 d (*.f64 l 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 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D)))
#s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D)
(*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))
(*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M))
(*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M)
(*.f64 M (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0)
(*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))
(pow.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l))))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 h (*.f64 (*.f64 d d) l))))
(*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))
(neg.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal 1/4 binary64)))
(*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))
(/.f64 (*.f64 #s(literal 1/4 binary64) h) (*.f64 (*.f64 d d) l))
#s(literal 1/4 binary64)
(*.f64 h (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(/.f64 (/.f64 h (*.f64 d d)) l)
(/.f64 (neg.f64 h) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 h (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) h))
(*.f64 (*.f64 d d) l)
(*.f64 l (*.f64 d d))
(*.f64 d (*.f64 l d))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
#s(literal 2 binary64)
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))) M))
(*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))) M)
(*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))))
#s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D)))
(*.f64 (*.f64 #s(literal -1 binary64) D) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))
#s(literal -1 binary64)
(*.f64 (*.f64 D w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D)
(*.f64 D (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))

eval53.0ms (1%)

Memory
19.2MiB live, 105.3MiB allocated; 14ms collecting garbage
Compiler

Compiled 21 202 to 2 294 computations (89.2% saved)

prune30.0ms (0.6%)

Memory
3.8MiB live, 63.6MiB allocated; 8ms collecting garbage
Pruning

25 alts after pruning (23 fresh and 2 done)

PrunedKeptTotal
New36719386
Fresh11415
Picked415
Done112
Total38325408
Accuracy
98.2%
Counts
408 → 25
Alt Table
Click to see full alt table
StatusAccuracyProgram
66.9%
(*.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)
81.1%
(*.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.1%
(*.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)
86.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M h) (/.f64 D (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) l))))
74.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
86.9%
(*.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)))))
65.7%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d))) (/.f64 h l)))))
83.1%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d))) M)))))
82.8%
(*.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 D (/.f64 (*.f64 M h) (*.f64 l d))))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
71.3%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
12.6%
#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))
1.6%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 (*.f64 #s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))) d))) w0) M))
2.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))) M))
2.1%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))))))
1.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))) d)))))))
1.6%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) w0) M) (*.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))))
18.1%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D)))
19.4%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))))
21.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d)))))))
1.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d))))))))
8.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h l) (pow.f64 d #s(literal 2 binary64)))))) l))))))
21.1%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (/.f64 (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))) d)))))
1.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))) d))))))
21.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d))))
1.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d)))))
Compiler

Compiled 2 356 to 1 644 computations (30.2% saved)

series214.0ms (4.1%)

Memory
20.5MiB live, 478.0MiB allocated; 90ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePointExpression
17.0ms
D
@0
((* w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)))) w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l))) (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)) 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l) (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) (* (* M h) (/ D (+ d d))) (* M h) M h (/ D (+ d d)) D (+ d d) d (* (/ D (+ d d)) M) l (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h l)))))) (* w0 (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (/ h l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) M) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D)) (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (sqrt (* -1/4 (/ h (* (* d d) l)))) (* -1/4 (/ h (* (* d d) l))) -1/4 (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l)))))) -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l))))) (* D 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))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)))
14.0ms
l
@-inf
((* w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)))) w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l))) (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)) 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l) (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) (* (* M h) (/ D (+ d d))) (* M h) M h (/ D (+ d d)) D (+ d d) d (* (/ D (+ d d)) M) l (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h l)))))) (* w0 (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (/ h l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) M) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D)) (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (sqrt (* -1/4 (/ h (* (* d d) l)))) (* -1/4 (/ h (* (* d d) l))) -1/4 (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l)))))) -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l))))) (* D 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))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)))
13.0ms
M
@-inf
((* w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)))) w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l))) (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)) 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l) (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) (* (* M h) (/ D (+ d d))) (* M h) M h (/ D (+ d d)) D (+ d d) d (* (/ D (+ d d)) M) l (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h l)))))) (* w0 (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (/ h l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) M) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D)) (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (sqrt (* -1/4 (/ h (* (* d d) l)))) (* -1/4 (/ h (* (* d d) l))) -1/4 (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l)))))) -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l))))) (* D 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))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)))
12.0ms
w0
@-inf
((* w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)))) w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l))) (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)) 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l) (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) (* (* M h) (/ D (+ d d))) (* M h) M h (/ D (+ d d)) D (+ d d) d (* (/ D (+ d d)) M) l (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h l)))))) (* w0 (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (/ h l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) M) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D)) (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (sqrt (* -1/4 (/ h (* (* d d) l)))) (* -1/4 (/ h (* (* d d) l))) -1/4 (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l)))))) -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l))))) (* D 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))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)))
12.0ms
D
@-inf
((* w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)))) w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l))) (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l)) 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) l) (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) (* (* M h) (/ D (+ d d))) (* M h) M h (/ D (+ d d)) D (+ d d) d (* (/ D (+ d d)) M) l (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (* M (* w0 (sqrt (neg (* 1/4 (/ h l)))))) (* w0 (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (/ h l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) M) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D)) (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (sqrt (* -1/4 (/ h (* (* d d) l)))) (* -1/4 (/ h (* (* d d) l))) -1/4 (/ h (* (* d d) l)) (* (* d d) l) (* d d) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (* -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l)))))) -1 (* (* D w0) (sqrt (* -1/4 (/ h (* (* d d) l))))) (* D 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))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)))

rewrite66.0ms (1.2%)

Memory
-32.0MiB live, 67.3MiB allocated; 47ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval46.0ms (0.9%)

Memory
5.9MiB live, 94.6MiB allocated; 13ms collecting garbage
Compiler

Compiled 22 390 to 2 408 computations (89.2% saved)

prune22.0ms (0.4%)

Memory
11.7MiB live, 58.0MiB allocated; 3ms collecting garbage
Pruning

25 alts after pruning (24 fresh and 1 done)

PrunedKeptTotal
New36715382
Fresh9918
Picked505
Done112
Total38225407
Accuracy
99.2%
Counts
407 → 25
Alt Table
Click to see full alt table
StatusAccuracyProgram
66.9%
(*.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)
86.9%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 (/.f64 D (+.f64 d d)) M)) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
86.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M h) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) D))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) D)) M)) l))))
74.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
65.7%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d))) (/.f64 h l)))))
71.3%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
12.6%
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) 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))
1.6%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 (*.f64 #s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))) d))) w0) M))
2.1%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 D w0) (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) h) (*.f64 (*.f64 d d) l)))))) M))
1.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 #s(approx (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)) D))) M))
1.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (/.f64 (*.f64 D (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d)))) M))
1.8%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) #s(approx (sqrt (* -1/4 (/ h (* (* d d) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d)))))))
18.1%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D)))
19.4%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))))
21.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d)))))))
1.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d))))))))
1.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))) d))))))
21.8%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0)) d))))
21.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
11.1%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l))) l))))) d))))
10.8%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))))) l)) d))))
20.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 (*.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) D) (/.f64 #s(literal 1 binary64) d)))))
20.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
9.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) #s(approx (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))))) (*.f64 d l))))))
Compiler

Compiled 1 430 to 965 computations (32.5% saved)

regimes490.0ms (9.3%)

Memory
29.0MiB live, 747.8MiB allocated; 95ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
2 → 2
3 → 2
8 → 2
26 → 2
28 → 3
32 → 3
33 → 3
62 → 2
Calls
Call 1
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Outputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 2
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 3
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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 4
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (/.f64 (*.f64 D (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d)))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 #s(approx (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (/.f64 (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))) d)))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0)) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 5
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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (/.f64 (*.f64 D (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d)))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 #s(approx (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d)))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) #s(approx (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))))) (*.f64 d l))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 (*.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) D) (/.f64 #s(literal 1 binary64) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (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 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) #s(approx (sqrt (* -1/4 (/ h (* (* d d) l)))) (/.f64 (sqrt.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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 D w0) (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) h) (*.f64 (*.f64 d d) l)))))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (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 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) w0) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))))))
#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 (*.f64 D D) (*.f64 d d)) (/.f64 h l))))))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d)))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 6
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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (/.f64 (*.f64 D (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d)))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 #s(approx (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d)))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) #s(approx (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))))) (*.f64 d l))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 (*.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) D) (/.f64 #s(literal 1 binary64) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (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 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) #s(approx (sqrt (* -1/4 (/ h (* (* d d) l)))) (/.f64 (sqrt.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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 D w0) (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) h) (*.f64 (*.f64 d d) l)))))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (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 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) w0) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))))))
#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 (*.f64 D D) (*.f64 d d)) (/.f64 h l))))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
(*.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 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 7
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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (/.f64 (*.f64 D (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d)))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 #s(approx (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d)))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) #s(approx (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))))) (*.f64 d l))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 (*.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) D) (/.f64 #s(literal 1 binary64) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (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 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) #s(approx (sqrt (* -1/4 (/ h (* (* d d) l)))) (/.f64 (sqrt.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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 D w0) (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) h) (*.f64 (*.f64 d d) l)))))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (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 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) w0) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))))))
#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 (*.f64 D D) (*.f64 d d)) (/.f64 h l))))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
(*.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 D (/.f64 (*.f64 M h) (*.f64 l d))))) (*.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 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 8
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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (/.f64 (*.f64 D (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d)))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 #s(approx (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d)))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) #s(approx (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))))) (*.f64 d l))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 (*.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) D) (/.f64 #s(literal 1 binary64) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (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 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) #s(approx (sqrt (* -1/4 (/ h (* (* d d) l)))) (/.f64 (sqrt.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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 D w0) (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) h) (*.f64 (*.f64 d d) l)))))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (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 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) w0) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))))))
#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 (*.f64 D D) (*.f64 d d)) (/.f64 h l))))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
(*.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 D (/.f64 (*.f64 M h) (*.f64 l d))))) (*.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 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
(*.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 (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)
Call 9
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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 D (/.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0)) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) D) (/.f64 (*.f64 D (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d)))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 #s(approx (* (sqrt (* -1/4 (/ h (* (* d d) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d)))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) M) D)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) #s(approx (/ (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) d) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))))) (*.f64 d l))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 (*.f64 D M) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 (*.f64 (*.f64 (*.f64 M w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) D) (/.f64 #s(literal 1 binary64) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h l))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))) d))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (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 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) #s(approx (sqrt (* -1/4 (/ h (* (* d d) l)))) (/.f64 (sqrt.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 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 D w0) (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) h) (*.f64 (*.f64 d d) l)))))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) w0) D))) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (*.f64 w0 (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))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (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 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) w0) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 D w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))))))))
#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 (*.f64 D D) (*.f64 d d)) (/.f64 h l))))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
(*.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 D (/.f64 (*.f64 M h) (*.f64 l d))))) (*.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 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 (/.f64 D (+.f64 d d)) M)) l) (*.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)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d))))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M h) (/.f64 D (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d))) (/.f64 h l)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (/.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 (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))) d)))))
(*.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 #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 #s(literal 1 binary64) (+.f64 d d))) M)))))
(*.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 (* (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) w0) M) (*.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 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 (*.f64 #s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))) d))) w0) M))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.f64 D (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h l) (pow.f64 d #s(literal 2 binary64)))))) l))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) (*.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 (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))) d))))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M h) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) D))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) D)) M)) l))))
#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 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 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M h) (/ D (+ d d))) (* (/ D (+ d d)) M)) 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 M #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64)))))) l))))
#s(approx (* 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)))))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (* M (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))))) #s(approx (* D (* M (* w0 (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))))) (/.f64 (*.f64 D (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) w0) M)) d))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 (/.f64 D (+.f64 d d)) M)) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
Calls

52 calls:

56.0ms
(*.f64 #s(literal 2 binary64) d)
31.0ms
(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
28.0ms
l
24.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)))
20.0ms
w0
Results
AccuracySegmentsBranch
71.3%1(*.f64 #s(literal 2 binary64) d)
71.3%1d
71.3%1(/.f64 h l)
71.3%1M
71.3%1(*.f64 M D)
71.3%1(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
71.3%1(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
71.3%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))))
71.3%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)))
71.3%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)))))
71.3%1(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
76.2%2M
71.3%1h
71.3%1(*.f64 #s(literal 2 binary64) d)
76.4%2(*.f64 M D)
71.3%1w0
71.3%1D
71.3%1l
71.3%1d
73.7%2(/.f64 h l)
88.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))))
88.2%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
88.7%3(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
88.7%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
89.1%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
82.9%2(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
89.2%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
91.0%3(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
91.7%4(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))))
89.1%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)))))
87.8%3(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
91.0%3(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
92.0%4(-.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.6%3(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
91.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))))
91.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.6%3(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
86.9%1(/.f64 h l)
86.9%1(*.f64 #s(literal 2 binary64) d)
86.9%1(*.f64 M D)
91.3%3(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
89.3%2(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
92.8%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
93.6%3(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
93.9%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))))
93.9%3(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
86.9%1w0
86.9%1M
86.9%1D
86.9%1h
86.9%1l
86.9%1d
Compiler

Compiled 3 503 to 1 045 computations (70.2% saved)

bsearch3.0ms (0%)

Memory
-44.6MiB live, 0.9MiB allocated; 4ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-inf
-1.4583539352577764e+306
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch1.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-inf
-1.4583539352577764e+306
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch1.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-4.590544084546764e-7
-1.9788198498752323e-25
0.0ms
-inf
-1.4583539352577764e+306
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch1.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-4.590544084546764e-7
-1.9788198498752323e-25
0.0ms
-inf
-1.4583539352577764e+306
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-687.586614118161
-3.7447417691263634
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-687.586614118161
-3.7447417691263634
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-687.586614118161
-3.7447417691263634
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
-6.851157089176242e+24
-687.586614118161
Compiler

Compiled 21 to 26 computations (-23.8% saved)

derivations42.0ms (0.8%)

Memory
16.9MiB live, 66.6MiB allocated; 10ms collecting garbage
Stop Event
fuel
Compiler

Compiled 1 011 to 141 computations (86.1% saved)

preprocess350.0ms (6.6%)

Memory
18.9MiB live, 679.7MiB allocated; 94ms collecting garbage
Remove

(sort M D)

(negabs w0)

(abs d)

(abs D)

(abs M)

Compiler

Compiled 17 085 to 8 636 computations (49.5% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...