Henrywood and Agarwal, Equation (12)

Time bar (total: 8.0s)

start0.0ms (0%)

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

analyze493.0ms (6.2%)

Memory
70.5MiB live, 943.9MiB allocated; 277ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
12.5%12.5%87.3%0.2%0%0%0%4
12.5%12.5%87.3%0.2%0%0%0%5
12.5%12.5%87.3%0.2%0%0%0%6
15.4%12.5%68.6%0.2%0%18.7%0%7
16.7%12.5%62.3%0.2%0%24.9%0%8
20%14%56.1%0.2%0%29.6%0%9
20%14%56.1%0.2%0%29.6%0%10
20%14%56.1%0.2%0%29.6%0%11
22.9%14.8%49.9%0.2%0%35.1%0%12
Compiler

Compiled 37 to 24 computations (35.1% saved)

sample4.9s (61.7%)

Memory
33.0MiB live, 8 490.3MiB allocated; 2.6s collecting garbage
Samples
2.3s12 975×0invalid
1.5s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.8s
ival-mult!: 794.0ms (27.9% of total)
ival-pow: 673.0ms (23.6% of total)
ival-div!: 661.0ms (23.2% of total)
ival-pow2: 656.0ms (23% of total)
ival-sub!: 58.0ms (2% of total)
adjust: 4.0ms (0.1% of total)
Bogosity

preprocess56.0ms (0.7%)

Memory
-25.1MiB live, 70.6MiB allocated; 14ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0171589
1748556
24245550
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
33.3%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Symmetry

(abs d)

(abs M)

(abs D)

(sort M D)

Compiler

Compiled 70 to 44 computations (37.1% saved)

series80.0ms (1%)

Memory
3.3MiB live, 146.5MiB allocated; 18ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02001456
Stop Event
iter-limit
Counts
22 → 46
Calls
Call 1
Inputs
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(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)
(/.f64 h l)
Outputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) l) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (pow.f64 d #s(literal 2 binary64))))
#s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (pow (/ d h) (/ 1 2)) (sqrt.f64 (/.f64 d h)))
#s(approx (/ d h) (/.f64 d h))
#s(approx d d)
#s(approx (pow (/ d l) (/ 1 2)) (sqrt.f64 (/.f64 d l)))
#s(approx (/ d l) (/.f64 d l))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (/.f64 (-.f64 (pow.f64 d #s(literal 2 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)) l))) (pow.f64 d #s(literal 2 binary64))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (*.f64 #s(literal 1/8 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 (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 (* 2 d) (*.f64 #s(literal 2 binary64) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ 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)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))))
#s(approx (pow (/ d h) (/ 1 2)) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))
#s(approx (pow (/ d l) (/ 1 2)) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))
#s(approx (- 1 (* (* (/ 1 2) (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 (pow (/ d h) (/ 1 2)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))))
#s(approx (pow (/ d l) (/ 1 2)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l)))) h))
#s(approx (pow (/ d h) (/ 1 2)) (/.f64 (sqrt.f64 (*.f64 d h)) h))
#s(approx h h)
#s(approx (/ h l) (/.f64 h l))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.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)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) h))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 h (-.f64 (/.f64 #s(literal 1 binary64) h) (*.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))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) h) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.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 binary64) h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h)))))) (pow.f64 d #s(literal 2 binary64))) (*.f64 l (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))))) (pow.f64 l #s(literal 2 binary64))))
#s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l))
#s(approx (pow (/ d l) (/ 1 2)) (/.f64 (sqrt.f64 (*.f64 d l)) l))
#s(approx l l)
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (/.f64 (-.f64 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 (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))
#s(approx (* M D) (*.f64 D M))
#s(approx M M)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (pow.f64 M #s(literal 2 binary64))))))
#s(approx (- 1 (* (* (/ 1 2) (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/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx D D)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (pow.f64 D #s(literal 2 binary64))))))
#s(approx (- 1 (* (* (/ 1 2) (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/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
Calls

15 calls:

TimeVariablePoint
8.0ms
h
inf
6.0ms
d
0
6.0ms
d
inf
6.0ms
M
inf
5.0ms
d
-inf

rewrite59.0ms (0.7%)

Memory
42.7MiB live, 88.0MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022132
038126
1132124
01053122
Stop Event
iter-limit
iter-limit
node-limit
iter-limit
Counts
22 → 281
Calls
Call 1
Inputs
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(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)
(/.f64 h l)
Outputs
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 1 binary64))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)))
(/.f64 (*.f64 (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64)))
(neg.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(neg.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal -1 binary64))))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l))))
(+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (sqrt.f64 (/.f64 d h))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/2 binary64)))
(*.f64 (fabs.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))))
(*.f64 (neg.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (pow.f64 d #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) h) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)))
(pow.f64 (exp.f64 (log.f64 (/.f64 d h))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 d h) (/.f64 d h)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 d h) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d)))
(sqrt.f64 (/.f64 d h))
(fabs.f64 (sqrt.f64 (/.f64 d h)))
(exp.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) h) d)
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 h)))
(*.f64 #s(literal 1 binary64) (/.f64 d h))
(*.f64 d (/.f64 #s(literal 1 binary64) h))
(pow.f64 (/.f64 h d) #s(literal -1 binary64))
(/.f64 (*.f64 d #s(literal 1 binary64)) h)
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 h d)))
(/.f64 (neg.f64 d) (neg.f64 h))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 h d)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 h d) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 h d))
(/.f64 d h)
(neg.f64 (/.f64 d (neg.f64 h)))
(neg.f64 (/.f64 (neg.f64 d) h))
d
h
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(*.f64 (fabs.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))))
(*.f64 (neg.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(*.f64 (pow.f64 d #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) l) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))
(pow.f64 (exp.f64 (log.f64 (/.f64 d l))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(sqrt.f64 (/.f64 d l))
(fabs.f64 (sqrt.f64 (/.f64 d l)))
(exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) l) d)
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 #s(literal 1 binary64) (/.f64 d l))
(*.f64 d (/.f64 #s(literal 1 binary64) l))
(pow.f64 (/.f64 l d) #s(literal -1 binary64))
(/.f64 (*.f64 d #s(literal 1 binary64)) l)
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l d)))
(/.f64 (neg.f64 d) (neg.f64 l))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l d) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 l d))
(/.f64 d l)
(neg.f64 (/.f64 d (neg.f64 l)))
(neg.f64 (/.f64 (neg.f64 d) l))
l
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 2 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)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
(*.f64 (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h)) l)
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l))))))
(/.f64 (-.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h))) (*.f64 #s(literal 2 binary64) l))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
(/.f64 (neg.f64 (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)))
(/.f64 (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 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)) #s(literal 1/2 binary64) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64)) (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64))) #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)) #s(literal 1/2 binary64) #s(literal -1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) h) (/.f64 #s(literal 1 binary64) l) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 h l)) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.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 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64))
(fma.f64 (/.f64 h l) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) (neg.f64 (/.f64 h l)) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.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 #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)) #s(literal 1/2 binary64) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64))) (/.f64 h l)))
(-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l))))
(-.f64 #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/2 binary64)))
(+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l)))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64))) (/.f64 h l))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64))
(*.f64 (/.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))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) #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))) (/.f64 h l)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (/.f64 h l) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) #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/2 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 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))) #s(literal 1/2 binary64)) (/.f64 h l))
(*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l)))
(*.f64 #s(literal 1/2 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 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))
(*.f64 #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/2 binary64)))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h)) l)
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) (neg.f64 h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 l h))
(/.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64))) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64))) (/.f64 l h))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h)) (*.f64 #s(literal 2 binary64) l))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h) (*.f64 l #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h) l)
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l)) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) (/.f64 l h))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h)))
(/.f64 #s(literal 1 binary64) (/.f64 #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/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.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 M) D)) (*.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 M) D) (*.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 M) D)) (*.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 M) D) (*.f64 (*.f64 D M) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal -2 binary64) d) d))
(/.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 (neg.f64 M) D)) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 D M)) (*.f64 (*.f64 #s(literal -2 binary64) d) (+.f64 d d)))
(/.f64 (*.f64 (*.f64 (neg.f64 M) D) #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 M) D)) (*.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 M) D)) (*.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 M) D) (/.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 M) D)) (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 M) D) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 D M) (+.f64 d d))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 d d) (*.f64 D M))))
(/.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 M) D) (+.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 #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))))
(fma.f64 #s(literal 1 binary64) d (*.f64 #s(literal 1 binary64) d))
(fma.f64 d #s(literal 1 binary64) (*.f64 d #s(literal 1 binary64)))
(-.f64 d (neg.f64 d))
(+.f64 (*.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1 binary64) d))
(+.f64 (*.f64 d #s(literal 1 binary64)) (*.f64 d #s(literal 1 binary64)))
(+.f64 d d)
(*.f64 (/.f64 #s(literal 1 binary64) l) h)
(*.f64 (neg.f64 h) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 #s(literal 1 binary64) (/.f64 h l))
(*.f64 h (/.f64 #s(literal 1 binary64) 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 #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))
(/.f64 h l)
(neg.f64 (/.f64 h (neg.f64 l)))
(neg.f64 (/.f64 (neg.f64 h) l))

eval38.0ms (0.5%)

Memory
-12.7MiB live, 78.0MiB allocated; 12ms collecting garbage
Compiler

Compiled 13 357 to 1 565 computations (88.3% saved)

prune43.0ms (0.5%)

Memory
-26.1MiB live, 75.8MiB allocated; 22ms collecting garbage
Pruning

30 alts after pruning (30 fresh and 0 done)

PrunedKeptTotal
New28530315
Fresh000
Picked101
Done000
Total28630316
Accuracy
88.0%
Counts
316 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
32.3%
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
24.3%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
24.3%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
30.9%
(*.f64 (*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (sqrt.f64 (/.f64 d h)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
26.3%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h) l)))
32.2%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 D M)) (+.f64 d d))) (/.f64 h l))))
33.3%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 D M) #s(literal 1 binary64)) (*.f64 (+.f64 d d) (/.f64 (+.f64 d d) (*.f64 D M))))) (/.f64 h l))))
33.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1/2 binary64))) (/.f64 h l))))
19.9%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
0.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
32.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
30.2%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
28.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
1.2%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
0.0%
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
34.3%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
29.8%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
34.3%
(*.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
31.0%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
29.1%
(*.f64 (*.f64 #s(approx (pow (/ d h) (/ 1 2)) (/.f64 (sqrt.f64 (*.f64 d h)) h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
37.8%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
27.4%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
17.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))
13.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) l) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (pow.f64 d #s(literal 2 binary64))))
15.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l)))) h))
15.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
14.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ 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)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))))
10.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
8.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (pow.f64 M #s(literal 2 binary64))))))
9.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
Compiler

Compiled 2 700 to 1 686 computations (37.6% saved)

series185.0ms (2.3%)

Memory
46.0MiB live, 319.4MiB allocated; 37ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

15 calls:

TimeVariablePoint
48.0ms
D
0
15.0ms
d
0
12.0ms
d
inf
11.0ms
l
-inf
11.0ms
l
0

rewrite55.0ms (0.7%)

Memory
-22.7MiB live, 68.3MiB allocated; 22ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval39.0ms (0.5%)

Memory
5.2MiB live, 93.6MiB allocated; 16ms collecting garbage
Compiler

Compiled 18 726 to 1 524 computations (91.9% saved)

prune71.0ms (0.9%)

Memory
10.7MiB live, 150.4MiB allocated; 28ms collecting garbage
Pruning

62 alts after pruning (61 fresh and 1 done)

PrunedKeptTotal
New34251393
Fresh151025
Picked415
Done000
Total36162423
Accuracy
89.3%
Counts
423 → 62
Alt Table
Click to see full alt table
StatusAccuracyProgram
32.3%
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
0.0%
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
43.1%
(*.f64 (/.f64 (sqrt.f64 (*.f64 d d)) (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
46.1%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 d (/.f64 d (*.f64 l h)))))
20.7%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (sqrt.f64 (*.f64 (*.f64 l d) (/.f64 d h))) l)))
24.3%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
24.3%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
33.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1/2 binary64))) (/.f64 h l))))
0.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
0.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 D M)))) (+.f64 d d)) (/.f64 h l))))
0.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 D M))) #s(literal 2 binary64))) (/.f64 h l))))
0.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
32.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
30.2%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
1.2%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
40.3%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
37.8%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
28.6%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
21.3%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
30.6%
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l)))))
51.2%
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
28.2%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
25.5%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 D M)))) (+.f64 d d)) (/.f64 h l))))
27.4%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
16.7%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
23.5%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) #s(approx (sqrt (/ d h)) (/.f64 (sqrt.f64 (*.f64 d h)) h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
29.0%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
16.5%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 #s(approx (* (sqrt (* d l)) (sqrt (/ d h))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 l d))))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
21.5%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (*.f64 (sqrt.f64 (*.f64 (*.f64 l d) (/.f64 d h))) (/.f64 #s(literal 1 binary64) l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
68.7%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
18.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
16.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) h))
15.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
15.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
14.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
13.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
5.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
16.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 h (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l))) h))
4.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 d h))))) (sqrt.f64 (/.f64 d l))) h))
5.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
16.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
13.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d l))) l)) h))
10.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))) (sqrt.f64 (/.f64 h d))))) h))
16.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) h))
4.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
14.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ 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)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))))
8.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (pow.f64 M #s(literal 2 binary64))))))
16.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
14.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
9.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
4.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (sqrt.f64 (neg.f64 l))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l)))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))))
9.3%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) 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 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))) h))
13.8%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
31.7%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (*.f64 d l))))
1.4%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
7.3%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
Compiler

Compiled 5 841 to 3 779 computations (35.3% saved)

series139.0ms (1.7%)

Memory
18.3MiB live, 254.8MiB allocated; 63ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

15 calls:

TimeVariablePoint
29.0ms
h
0
11.0ms
d
inf
10.0ms
l
0
9.0ms
d
-inf
8.0ms
l
-inf

rewrite48.0ms (0.6%)

Memory
-8.1MiB live, 87.6MiB allocated; 14ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval65.0ms (0.8%)

Memory
-13.5MiB live, 77.1MiB allocated; 7ms collecting garbage
Compiler

Compiled 17 945 to 1 504 computations (91.6% saved)

prune60.0ms (0.8%)

Memory
3.5MiB live, 146.9MiB allocated; 13ms collecting garbage
Pruning

63 alts after pruning (60 fresh and 3 done)

PrunedKeptTotal
New32226348
Fresh223456
Picked325
Done011
Total34763410
Accuracy
90.1%
Counts
410 → 63
Alt Table
Click to see full alt table
StatusAccuracyProgram
32.3%
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
63.4%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h)))))
50.8%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))))
46.1%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 d (/.f64 d (*.f64 l h)))))
20.7%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (sqrt.f64 (*.f64 (*.f64 l d) (/.f64 d h))) l)))
44.0%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))
66.8%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
24.3%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
24.3%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
0.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
32.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
40.3%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
37.8%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
28.6%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
21.3%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
29.4%
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
25.5%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 D M)))) (+.f64 d d)) (/.f64 h l))))
16.7%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
28.0%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
29.0%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 D M))) #s(literal 2 binary64))) (/.f64 h l))))
16.5%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 #s(approx (* (sqrt (* d l)) (sqrt (/ d h))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 l d))))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
71.4%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
68.7%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
39.0%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
32.5%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) h))
18.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
16.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d)))) (sqrt.f64 (neg.f64 l)))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d))))) (sqrt.f64 (neg.f64 l)))) h))
15.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
15.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
14.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
13.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
5.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
5.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
16.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))) h))
13.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d l))) l)) h))
16.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) h))
4.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
14.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ 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)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))))
8.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (pow.f64 M #s(literal 2 binary64))))))
16.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
14.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
9.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
7.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l)))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l))))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l))))))
4.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
9.3%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) 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 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))) h))
13.8%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
7.3%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
1.4%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
7.3%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
22.7%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))))
22.0%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
24.6%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
Compiler

Compiled 6 049 to 3 873 computations (36% saved)

series148.0ms (1.9%)

Memory
32.8MiB live, 324.7MiB allocated; 47ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

15 calls:

TimeVariablePoint
13.0ms
D
-inf
13.0ms
h
0
12.0ms
d
inf
12.0ms
h
-inf
11.0ms
d
0

rewrite47.0ms (0.6%)

Memory
-4.1MiB live, 88.2MiB allocated; 5ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval52.0ms (0.6%)

Memory
-16.1MiB live, 78.3MiB allocated; 11ms collecting garbage
Compiler

Compiled 17 722 to 1 751 computations (90.1% saved)

prune74.0ms (0.9%)

Memory
34.6MiB live, 126.9MiB allocated; 5ms collecting garbage
Pruning

70 alts after pruning (65 fresh and 5 done)

PrunedKeptTotal
New31426340
Fresh163955
Picked325
Done033
Total33370403
Accuracy
90.4%
Counts
403 → 70
Alt Table
Click to see full alt table
StatusAccuracyProgram
32.3%
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
33.9%
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
50.8%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))))
46.1%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 d (/.f64 d (*.f64 l h)))))
20.7%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (sqrt.f64 (*.f64 (*.f64 l d) (/.f64 d h))) l)))
44.0%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))
66.8%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
24.3%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
0.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
40.3%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
37.8%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
28.6%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
31.1%
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
26.2%
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
17.2%
(*.f64 (sqrt.f64 (/.f64 d h)) #s(approx (* (sqrt (/ d l)) (- 1 (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) (/ h l)))) (*.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)) (sqrt.f64 (/.f64 d l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))))
19.7%
(*.f64 (sqrt.f64 (/.f64 d h)) #s(approx (* (sqrt (/ d l)) (- 1 (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) (/ h l)))) (*.f64 d (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
16.7%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
29.0%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 D M))) #s(literal 2 binary64))) (/.f64 h l))))
16.5%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 #s(approx (* (sqrt (* d l)) (sqrt (/ d h))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 l d))))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
71.7%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
70.7%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) D) (+.f64 d d)) M) #s(literal 1/2 binary64)) h) l)))
70.8%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
68.7%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
39.0%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l)) #s(literal 1 binary64)))
30.8%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
32.5%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
28.0%
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
30.0%
(*.f64 #s(approx (sqrt (/ d h)) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
1.1%
(*.f64 #s(approx (sqrt (/ d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) h))
3.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (sqrt.f64 (neg.f64 l))) h))
18.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
6.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
3.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) #s(approx (sqrt h) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))))) (sqrt.f64 (/.f64 d l))) h))
3.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 #s(approx (sqrt d) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) d))))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
16.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d)))) (sqrt.f64 (neg.f64 l)))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d))))) (sqrt.f64 (neg.f64 l)))) h))
15.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
15.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
14.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
13.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
5.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
5.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
16.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
3.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))))) h))
15.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) l))) h))
4.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
18.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
16.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
14.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
9.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
7.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
3.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l)))))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l)))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l))))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l))))))
4.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
22.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
24.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
0.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
9.3%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) 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 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))) h))
13.8%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
1.4%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (*.f64 #s(literal -1 binary64) (*.f64 d (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
7.3%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
7.3%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
22.7%
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))))
Compiler

Compiled 3 470 to 2 221 computations (36% saved)

regimes890.0ms (11.2%)

Memory
-3.8MiB live, 1 431.2MiB allocated; 286ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
4 → 2
7 → 2
58 → 2
59 → 4
62 → 1
74 → 1
92 → 2
104 → 2
134 → 2
Calls
Call 1
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
Outputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
Call 2
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
Outputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
Call 3
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
Outputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
Call 4
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d l))) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 h (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 d h))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d)))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 #s(approx (sqrt d) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) d))))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) #s(approx (sqrt h) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d))))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))) (sqrt.f64 (/.f64 h d))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (sqrt.f64 (neg.f64 l))))
Outputs
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
Call 5
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d l))) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 h (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 d h))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d)))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 #s(approx (sqrt d) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) d))))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) #s(approx (sqrt h) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d))))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))) (sqrt.f64 (/.f64 h d))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (sqrt.f64 (neg.f64 l))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
Outputs
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
Call 6
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d l))) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 h (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 d h))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d)))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 #s(approx (sqrt d) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) d))))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) #s(approx (sqrt h) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d))))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))) (sqrt.f64 (/.f64 h d))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (sqrt.f64 (neg.f64 l))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) D) (+.f64 d d)) M) #s(literal 1/2 binary64)) h) l)))
Outputs
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
Call 7
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d l))) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 h (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 d h))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d)))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 #s(approx (sqrt d) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) d))))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) #s(approx (sqrt h) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d))))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))) (sqrt.f64 (/.f64 h d))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (sqrt.f64 (neg.f64 l))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) D) (+.f64 d d)) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 d (/.f64 d (*.f64 l h)))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
Outputs
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
Call 8
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d l))) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 h (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 d h))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d)))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 #s(approx (sqrt d) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) d))))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) #s(approx (sqrt h) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d))))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))) (sqrt.f64 (/.f64 h d))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (sqrt.f64 (neg.f64 l))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) D) (+.f64 d d)) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 d (/.f64 d (*.f64 l h)))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (sqrt.f64 (*.f64 (*.f64 l d) (/.f64 d h))) l)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 D M)))) (+.f64 d d)) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (sqrt (/ d h)) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 d d)) (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Outputs
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
Call 9
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d l))) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 h (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 d h))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d)))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 #s(approx (sqrt d) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) d))))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) #s(approx (sqrt h) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d))))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))) (sqrt.f64 (/.f64 h d))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (sqrt.f64 (neg.f64 l))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) D) (+.f64 d d)) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 d (/.f64 d (*.f64 l h)))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (sqrt.f64 (*.f64 (*.f64 l d) (/.f64 d h))) l)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 D M)))) (+.f64 d d)) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (sqrt (/ d h)) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 d d)) (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (*.f64 d l))))
(*.f64 #s(approx (sqrt (/ d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (*.f64 (sqrt.f64 (*.f64 (*.f64 l d) (/.f64 d h))) (/.f64 #s(literal 1 binary64) l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) #s(approx (sqrt (/ d h)) (/.f64 (sqrt.f64 (*.f64 d h)) h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 D M))) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 D M)))) (+.f64 d d)) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
Call 10
Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #s(approx (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 h l))) h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (neg (* (sqrt (/ 1 (* l h))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 h d)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 h d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d l))) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (*.f64 d (/.f64 #s(literal 1 binary64) l)))) h))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 h (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) h) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 d h))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) h) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 h (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (/ (sqrt (neg d)) (sqrt (neg l)))) (/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 d h))) (*.f64 l (sqrt.f64 (/.f64 #s(literal -1 binary64) l))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d)))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 #s(approx (sqrt (* d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 h d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (sqrt (/ d l)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (* (sqrt d) (sqrt h)) (sqrt (/ d l))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 #s(approx (sqrt d) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) d))))) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 d) #s(approx (sqrt h) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))))) (sqrt.f64 (/.f64 d l))) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (/.f64 #s(approx (sqrt (neg d)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal -1 binary64) d))))) (sqrt.f64 (neg.f64 l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d h)) (exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) h))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (* (sqrt (* d h)) (sqrt (/ d l))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))) (sqrt.f64 (/.f64 h d))))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (sqrt.f64 (neg.f64 l))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) D) (+.f64 d d)) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d (*.f64 l h)) d)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 d (/.f64 d (*.f64 l h)))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) #s(approx (* d (sqrt (/ 1 (* h l)))) (/.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) (*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) (/.f64 h l))) #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (sqrt.f64 (*.f64 (*.f64 l d) (/.f64 d h))) l)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 #s(approx (sqrt (/ d l)) (/.f64 (sqrt.f64 (*.f64 d l)) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 D M)))) (+.f64 d d)) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d #s(approx (sqrt (/ 1 (* h l))) (/.f64 (sqrt.f64 (/.f64 l h)) l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (sqrt (/ d h)) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 d d)) (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (*.f64 d l))))
(*.f64 #s(approx (sqrt (/ d h)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (*.f64 (sqrt.f64 (*.f64 (*.f64 l d) (/.f64 d h))) (/.f64 #s(literal 1 binary64) l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 (sqrt.f64 (*.f64 d l)) #s(approx (sqrt (/ d h)) (/.f64 (sqrt.f64 (*.f64 d h)) h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 (*.f64 #s(approx (sqrt (* d l)) (*.f64 l (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 D M))) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 D M)))) (+.f64 d d)) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1/2 binary64)) h) l)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 #s(approx (pow (/ d h) (/ 1 2)) (/.f64 (sqrt.f64 (*.f64 d h)) h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h 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)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 D M))) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (/.f64 #s(approx (* (sqrt (* d l)) (sqrt (/ d h))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 l d))))) l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (*.f64 #s(literal -1 binary64) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1/2 binary64)) h) l)))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1/2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 D M)) (+.f64 d d))) (/.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 d h)) #s(approx (* (sqrt (/ d l)) (- 1 (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) (/ h l)))) (*.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)) (sqrt.f64 (/.f64 d l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 (sqrt.f64 (/.f64 d l)) h)))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 D M) #s(literal 1 binary64)) (*.f64 (+.f64 d d) (/.f64 (+.f64 d d) (*.f64 D M))))) (/.f64 h l))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 d (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (*.f64 #s(literal -1 binary64) (*.f64 d (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (sqrt.f64 (/.f64 d h)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (sqrt.f64 (/.f64 d h)) #s(approx (* (sqrt (/ d l)) (- 1 (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) (/ h l)))) (*.f64 d (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l)))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (*.f64 d h)) (sqrt.f64 (/.f64 d l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (pow.f64 M #s(literal 2 binary64))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (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 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))) l) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))) (pow.f64 d #s(literal 2 binary64))))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) 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 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))) h))
#s(approx (* (sqrt (/ (* d d) (* h l))) (- 1 (/ (* (* (* (* (* (/ D (+ d d)) M) (/ D (+ d d))) M) 1/2) h) l))) (/.f64 (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) 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 (sqrt.f64 (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) h) l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ 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)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l))))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)))))))
Outputs
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 #s(approx (sqrt (/ (* d d) (* h l))) (*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 D (+.f64 d d))) M) #s(literal 1/2 binary64)) h) l)))
Calls

50 calls:

102.0ms
d
45.0ms
D
41.0ms
d
39.0ms
M
38.0ms
h
Results
AccuracySegmentsBranch
7.3%1(*.f64 M D)
7.3%1D
7.3%1d
7.3%1M
7.3%1(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
7.3%1h
7.3%1l
18.0%1(*.f64 M D)
21.6%2h
18.0%1d
20.1%2M
21.7%2l
18.0%1D
22.1%3(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
39.0%1h
39.0%1(*.f64 M D)
39.0%1M
40.7%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
39.0%1l
42.9%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
39.0%1D
41.5%2M
41.1%2(*.f64 M D)
39.0%1d
49.1%2(*.f64 M D)
44.5%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
45.0%3l
46.4%2D
52.3%4d
42.4%3h
48.0%2M
71.4%1(*.f64 M D)
71.4%1d
71.4%1h
71.4%1l
71.4%1D
71.4%1(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
71.4%1M
71.7%1M
71.7%1l
71.7%1(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
74.5%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
74.9%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
71.7%1(*.f64 M D)
75.8%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
71.7%1d
71.7%1h
73.6%2l
71.7%1M
71.7%1D
Compiler

Compiled 6 817 to 1 087 computations (84.1% saved)

bsearch2.0ms (0%)

Memory
3.4MiB live, 3.4MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
2.076671866875578e+280
+inf
Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory
2.5MiB live, 2.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
2.076671866875578e+280
+inf
Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
2.076671866875578e+280
+inf
Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch111.0ms (1.4%)

Memory
-15.7MiB live, 165.4MiB allocated; 28ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
39.0ms
8.361324599228771e+92
1.1802325764272631e+95
11.0ms
8.393944072448229e-150
9.554790799547744e-150
41.0ms
4.786291686941926e-252
1.522317909193845e-250
Samples
39.0ms256×0valid
29.0ms310×0invalid
Compiler

Compiled 1 295 to 922 computations (28.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 49.0ms
ival-div!: 15.0ms (30.8% of total)
ival-pow: 14.0ms (28.8% of total)
ival-mult!: 12.0ms (24.7% of total)
ival-pow2: 6.0ms (12.3% of total)
ival-sub!: 1.0ms (2.1% of total)
adjust: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.8MiB live, 1.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-4.182880945805983e-74
0.0
Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-4.182880945805983e-74
0.0
Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch51.0ms (0.6%)

Memory
-11.8MiB live, 77.8MiB allocated; 12ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
42.0ms
2.1004133067657853e-291
1.53258914411166e-289
Samples
20.0ms140×0invalid
14.0ms112×0valid
Compiler

Compiled 668 to 443 computations (33.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-div!: 9.0ms (35.7% of total)
ival-pow: 7.0ms (27.8% of total)
ival-mult!: 6.0ms (23.8% of total)
ival-pow2: 3.0ms (11.9% of total)
ival-sub!: 1.0ms (4% of total)
adjust: 0.0ms (0% of total)

derivations39.0ms (0.5%)

Memory
13.5MiB live, 58.4MiB allocated; 6ms collecting garbage
Stop Event
fuel
Compiler

Compiled 969 to 132 computations (86.4% saved)

preprocess207.0ms (2.6%)

Memory
-8.2MiB live, 483.2MiB allocated; 45ms collecting garbage
Remove

(sort M D)

(abs D)

(abs M)

(abs d)

Compiler

Compiled 11 244 to 4 918 computations (56.3% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...