Henrywood and Agarwal, Equation (12)

Time bar (total: 23.3s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

analyze743.0ms (3.2%)

Memory
-13.1MiB live, 475.8MiB allocated
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)

sample5.7s (24.5%)

Memory
46.9MiB live, 6 954.7MiB allocated
Samples
2.6s12 917×0invalid
1.7s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 3.4s
ival-mult: 1.1s (32% of total)
ival-div: 1.1s (31.7% of total)
ival-pow: 747.0ms (22% of total)
ival-pow2: 310.0ms (9.1% of total)
ival-sub: 125.0ms (3.7% of total)
exact: 21.0ms (0.6% of total)
ival-true: 18.0ms (0.5% of total)
ival-assert: 10.0ms (0.3% of total)
Bogosity

explain408.0ms (1.8%)

Memory
-19.7MiB live, 678.8MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
550-2(3.8822643052332085e-274 1.9114591352371057e+71 1.4268366249626574e+49 1.749866196525548e+71 1.2669197584628884e+261)(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
540-1(9.112824456911565e-85 1.055337145470016e-303 3060988.8278216296 -3.025465676412801e-80 -8.694816797571114e+119)(*.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))
510-1(-8.207109141418835e-32 -3.56496153305407e+290 -3.9393157086172e-70 -4.493207912267432e-39 2.240125870676064e-60)(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
330-3(-2.188119609409838e-109 -1.7649010011711418e-200 -520327567503505.3 -5.144014551280969e-302 4.630962553480818e-22)(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
230-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 #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))))
00-0-D
00-0-(*.f64 #s(literal 2 binary64) d)
00-0-(/.f64 h l)
00-0-(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
00-0-d
00-0-#s(literal 1 binary64)
00-0-(/.f64 d l)
00-0-(*.f64 M D)
00-0-(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
00-0-(/.f64 d h)
00-0-(-.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)))
00-0-#s(literal 2 binary64)
00-0-l
00-0-(*.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))))
00-0-M
00-0-h
00-0-(*.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)))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
pow.f64(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))oflow-rescue300
(/.f64 d l)overflow30
pow.f64(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))oflow-rescue270
(/.f64 d h)overflow27
pow.f64(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))uflow-rescue230
(/.f64 d l)underflow23
pow.f64(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))uflow-rescue230
(/.f64 d h)underflow23
*.f64(*.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))n*o200
/.f64(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))o/n170
(*.f64 M D)overflow36
*.f64(*.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))))n*o100
*.f64(*.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))))u*o100
(/.f64 d h)underflow23
(/.f64 d l)underflow23
(*.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))))underflow17
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))overflow82
(*.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)))overflow82
(/.f64 h l)overflow25
(-.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)))overflow76
(*.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))overflow76
(*.f64 M D)overflow36
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))overflow40
*.f64(*.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))o*u60
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))overflow82
(*.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)))overflow82
(*.f64 M D)overflow36
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))overflow40
(/.f64 h l)underflow33
*.f64(*.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))))n*u30
*.f64(*.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))u*o20
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))underflow73
(*.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)))underflow73
(*.f64 M D)underflow26
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))underflow36
(/.f64 h l)overflow25
/.f64(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))u/n20
(*.f64 M D)underflow26
Confusion
Predicted +Predicted -
+863
-34133
Precision
0.7166666666666667
Recall
0.9662921348314607
Confusion?
Predicted +Predicted MaybePredicted -
+8603
-340133
Precision?
0.7166666666666667
Recall?
0.9662921348314607
Freqs
test
numberfreq
0136
173
242
34
41
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
109.0ms512×0valid
Compiler

Compiled 352 to 70 computations (80.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 75.0ms
ival-pow: 20.0ms (26.8% of total)
ival-mult: 19.0ms (25.5% of total)
ival-div: 18.0ms (24.1% of total)
ival-pow2: 14.0ms (18.8% of total)
ival-sub: 2.0ms (2.7% of total)
ival-true: 1.0ms (1.3% of total)
exact: 1.0ms (1.3% of total)
ival-assert: 0.0ms (0% of total)

preprocess261.0ms (1.1%)

Memory
-13.5MiB live, 357.7MiB allocated
Algorithm
egg-herbie
Rules
6 600×lower-*.f32
6 588×lower-*.f64
3 422×lower-/.f32
3 414×lower-/.f64
2 244×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0168564
1558553
21960548
34611548
02229
03827
16727
217427
3105427
4344127
5672427
0802726
Stop Event
iter limit
node limit
iter limit
node limit
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))))
Outputs
(*.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 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (*.f64 h #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 l (*.f64 #s(literal 4 binary64) (*.f64 d d)))) #s(literal 1 binary64))))
Symmetry

(abs D)

(abs M)

(sort M D)

Compiler

Compiled 40 to 22 computations (45% saved)

eval0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
66.7%
(*.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))))
Compiler

Compiled 40 to 22 computations (45% saved)

simplify195.0ms (0.8%)

Memory
-13.9MiB live, 338.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5504
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Rules
6 600×lower-*.f32
6 588×lower-*.f64
3 422×lower-/.f32
3 414×lower-/.f64
2 244×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022132
038126
167126
2174126
31054126
43441126
56724126
08027124
Stop Event
iter limit
node limit
iter limit
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 (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 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (*.f64 h #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 l (*.f64 #s(literal 4 binary64) (*.f64 d d)))) #s(literal 1 binary64))))
(*.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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.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)))
(fma.f64 (*.f64 h #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 l (*.f64 #s(literal 4 binary64) (*.f64 d d)))) #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 h #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 l (*.f64 #s(literal 4 binary64) (*.f64 d d)))))
(*.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/2 binary64) (/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 #s(literal 4 binary64) (*.f64 d d))))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 #s(literal 4 binary64) (*.f64 d d)))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(*.f64 M D)
M
D
(*.f64 #s(literal 2 binary64) d)
(*.f64 d #s(literal 2 binary64))
(/.f64 h l)

localize71.0ms (0.3%)

Memory
30.3MiB live, 149.6MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy7.545317436507249
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
accuracy12.036629165323877
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy12.517238625490018
(*.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))
accuracy12.775604356515942
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
49.0ms256×0valid
Compiler

Compiled 156 to 24 computations (84.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-div: 10.0ms (28.1% of total)
ival-mult: 10.0ms (28.1% of total)
ival-pow: 10.0ms (28.1% of total)
ival-pow2: 3.0ms (8.4% of total)
ival-sub: 1.0ms (2.8% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series41.0ms (0.2%)

Memory
3.1MiB live, 79.0MiB allocated
Counts
6 → 180
Calls
Call 1
Inputs
#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())
Outputs
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
Calls

45 calls:

TimeVariablePointExpression
4.0ms
l
@inf
(* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))
3.0ms
h
@0
(* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))
2.0ms
D
@0
(pow (/ (* M D) (* 2 d)) 2)
2.0ms
d
@0
(pow (/ d h) (/ 1 2))
1.0ms
l
@0
(* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))

simplify326.0ms (1.4%)

Memory
8.3MiB live, 357.4MiB allocated
Algorithm
egg-herbie
Rules
11 250×lower-*.f64
11 250×lower-*.f32
5 988×associate-*r*
2 626×associate-*r/
2 342×times-frac
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0341972
1741940
22561940
311821940
433101940
535421940
636311940
736571940
836741940
936801940
1047671940
1148371940
1248461940
1348461940
1457421940
1572591940
1672771940
1772771940
1872771940
1972771940
0107371940
Stop Event
iter limit
node limit
Counts
180 → 180
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))
(* 1/2 (/ (* D M) d))
(*.f64 D (/.f64 (*.f64 M #s(literal 1/2 binary64)) d))

rewrite271.0ms (1.2%)

Memory
-13.4MiB live, 583.7MiB allocated
Rules
4 926×lower-*.f32
4 918×lower-*.f64
2 258×lower-/.f32
2 250×lower-/.f64
1 626×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01942
03240
19440
251540
3505840
0812140
Stop Event
iter limit
node limit
iter limit
Counts
6 → 610
Calls
Call 1
Inputs
(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 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) #s(literal 2 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 M D) (*.f64 #s(literal 2 binary64) d))
Outputs
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h))))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 d h))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 h d)) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (/.f64 d h))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 h d)) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (fma.f64 (neg.f64 (log.f64 h)) #s(literal 1/2 binary64) (*.f64 (log.f64 d) #s(literal 1/2 binary64))))
(sqrt.f64 (/.f64 d h))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 h (neg.f64 d))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 d)) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 h)))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (neg.f64 d))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (neg.f64 h))))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal -1 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 h (neg.f64 d)))))
(pow.f64 (/.f64 d h) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64))
(pow.f64 (/.f64 h d) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 d h) d) h) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (*.f64 (/.f64 h d) (/.f64 h d)) #s(literal -1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(pow.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (log.f64 (/.f64 h d)))
(pow.f64 (*.f64 (/.f64 (*.f64 (/.f64 d h) d) h) (/.f64 (*.f64 (/.f64 d h) d) h)) #s(literal 1/8 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.f64 (pow.f64 d #s(literal 1/4 binary64)) (pow.f64 (*.f64 h (/.f64 h d)) #s(literal -1/4 binary64)))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/8 binary64)) (pow.f64 (/.f64 d h) #s(literal 3/8 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 d h) d) #s(literal 1/4 binary64)) (pow.f64 h #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 3/8 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 d)) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 h))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (neg.f64 d))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 (neg.f64 h)))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 h))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 d)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l))))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 l d)) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 l d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (/.f64 d l))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 l d)) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (fma.f64 (neg.f64 (log.f64 l)) #s(literal 1/2 binary64) (*.f64 (log.f64 d) #s(literal 1/2 binary64))))
(sqrt.f64 (/.f64 d l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 l (neg.f64 d))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 d)) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 l)))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (neg.f64 d))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (neg.f64 l))))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal -1 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 l (neg.f64 d)))))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 d (/.f64 d l)) l) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (*.f64 (/.f64 l d) (/.f64 l d)) #s(literal -1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(pow.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (log.f64 (/.f64 l d)))
(pow.f64 (*.f64 (/.f64 (*.f64 d (/.f64 d l)) l) (/.f64 (*.f64 d (/.f64 d l)) l)) #s(literal 1/8 binary64))
(*.f64 #s(literal 1 binary64) (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 (pow.f64 d #s(literal 1/4 binary64)) (pow.f64 (*.f64 l (/.f64 l d)) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))
(*.f64 (pow.f64 (/.f64 d l) #s(literal 1/8 binary64)) (pow.f64 (/.f64 d l) #s(literal 3/8 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 d l) d) #s(literal 1/4 binary64)) (pow.f64 l #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (/.f64 d l) #s(literal 3/8 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 d)) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 l))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (neg.f64 d))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 (neg.f64 l)))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 l))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 d)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(exp.f64 (*.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)) (*.f64 M D))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 2 binary64))) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(exp.f64 (+.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (*.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(exp.f64 (fma.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64) (*.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 2 binary64) (*.f64 (log.f64 M) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (log.f64 (*.f64 M D)) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 D d)) #s(literal 2 binary64) (*.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) M)) #s(literal 2 binary64))))
(neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64)))))
(neg.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(neg.f64 (/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) (*.f64 d #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)) (*.f64 M D)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M (*.f64 D (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 (*.f64 M D) (neg.f64 (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal -2 binary64))) (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d)))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal 1 binary64))))
(/.f64 (*.f64 M D) (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)))
(/.f64 (*.f64 M D) (neg.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (neg.f64 (*.f64 M D)))))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 (neg.f64 (*.f64 M D)) (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (neg.f64 (*.f64 M D))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)) (*.f64 M D))))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 M D))))
(/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))
(/.f64 (*.f64 (*.f64 M D) (neg.f64 (*.f64 M D))) (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (*.f64 d (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 d (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) (*.f64 d d))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (neg.f64 d)))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 M D)))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 d (*.f64 M D)))
(/.f64 (/.f64 (*.f64 (*.f64 M D) M) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (/.f64 d D))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 M D)))
(/.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 #s(literal 2 binary64) M))
(/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d) d)
(/.f64 (/.f64 (*.f64 M D) d) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))) (neg.f64 (*.f64 d (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d)) (neg.f64 d))
(/.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) D)) (/.f64 d M))
(/.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 d M)) (/.f64 #s(literal 2 binary64) D))
(/.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) d) (/.f64 #s(literal 2 binary64) (*.f64 M D)))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 M D)))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) D) d)
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 d))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) d)) #s(literal 2 binary64))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) M) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) M) (*.f64 d #s(literal 2 binary64))) (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) #s(literal -1 binary64)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) d)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 d D))
(/.f64 (*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (neg.f64 D)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (neg.f64 d))
(/.f64 (*.f64 (/.f64 (*.f64 M D) d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M))) (/.f64 #s(literal 2 binary64) M))
(/.f64 (*.f64 M (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1 binary64)) (*.f64 (*.f64 d d) #s(literal 4 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 M D) (neg.f64 (*.f64 M D))) #s(literal 1 binary64)) (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal 1 binary64)) (*.f64 d (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) #s(literal 1 binary64)) (*.f64 d (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (*.f64 d d))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) #s(literal 1 binary64)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d) #s(literal 1 binary64)) d)
(/.f64 (/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) d) #s(literal 2 binary64))
(/.f64 (/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) d) #s(literal -2 binary64))
(/.f64 (/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) #s(literal 2 binary64)) (neg.f64 d))
(/.f64 (/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) (neg.f64 d)) #s(literal 2 binary64))
(/.f64 (/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) #s(literal -1 binary64)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 M D))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 d #s(literal 2 binary64)))))
(/.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (neg.f64 (*.f64 M D)))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 d)))
(/.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 #s(literal -1 binary64))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 M D)))))
(/.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (neg.f64 d))))
(/.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 (*.f64 M D) d))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal 1 binary64))
(pow.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal -2 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)) (*.f64 M D)) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 4 binary64))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(pow.f64 (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)) (*.f64 M D)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M (*.f64 D (*.f64 M D)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 (*.f64 M D) (neg.f64 (*.f64 M D)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d (*.f64 d #s(literal -2 binary64))) (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d #s(literal -2 binary64)) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 d (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) (neg.f64 (*.f64 M D))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(pow.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) #s(literal -1 binary64)) (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(pow.f64 (*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 d (*.f64 M D))))
(*.f64 M (*.f64 D (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))))
(*.f64 M (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M))))
(*.f64 M (*.f64 M (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))))))
(*.f64 M (*.f64 (*.f64 D (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))) #s(literal 1 binary64)))
(*.f64 D (*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))))
(*.f64 D (*.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 D (/.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)))
(*.f64 (*.f64 M D) (*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64)))))
(*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 (*.f64 M D) (/.f64 (neg.f64 (*.f64 M D)) (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)))))
(*.f64 (*.f64 M D) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal 1 binary64))
(*.f64 (neg.f64 (*.f64 M D)) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (neg.f64 (*.f64 M D)) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 d #s(literal -2 binary64))))
(*.f64 (neg.f64 (*.f64 M D)) (/.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(*.f64 (neg.f64 (*.f64 M D)) (/.f64 (*.f64 M D) (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)))))
(*.f64 (neg.f64 (*.f64 M D)) (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 (neg.f64 (*.f64 M D)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d (*.f64 M D))))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M)) #s(literal 1 binary64)))
(*.f64 (/.f64 D d) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))))
(*.f64 (/.f64 D d) (/.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 d D)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 d (*.f64 M D))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (neg.f64 (*.f64 M D)) (*.f64 d (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d d)))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 (*.f64 (*.f64 M D) M) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 d (*.f64 M D))))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 (/.f64 M d) (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 M (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64)))))
(*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) (*.f64 M M))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M (*.f64 D (*.f64 M D))))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 M D) (neg.f64 (*.f64 M D))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)))))
(*.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 d (*.f64 M D))))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (neg.f64 d)))
(*.f64 (/.f64 M d) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 M d) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (/.f64 M d) (/.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 d M)))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 d (*.f64 M D))))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 (/.f64 M d) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d))
(*.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) (/.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) d))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (/.f64 (*.f64 (*.f64 M D) M) (*.f64 d #s(literal 2 binary64))) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (/.f64 (*.f64 (*.f64 M D) M) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (/.f64 D d))
(*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) #s(literal 1 binary64)))
(*.f64 (*.f64 D (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))) M)
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (*.f64 M D))
(*.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M)) (*.f64 #s(literal 1/2 binary64) M))
(*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) (/.f64 #s(literal -1/2 binary64) d))
(*.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 (*.f64 M D) d) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 M D) d) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (*.f64 M D) d) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d (*.f64 M D))))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) D)) (/.f64 M d))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 d M)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (/.f64 M (/.f64 d M)) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 2 binary64) D)) (/.f64 M (/.f64 d M)))
(*.f64 (/.f64 M (/.f64 #s(literal 2 binary64) D)) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d M)))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d M)) (/.f64 M (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 #s(literal 2 binary64) M)) (/.f64 (*.f64 M D) d))
(*.f64 (/.f64 M (/.f64 #s(literal 2 binary64) M)) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d D)))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 d D)) (/.f64 M (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 D (/.f64 d M)) (/.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 D (/.f64 #s(literal 2 binary64) D)) (/.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 d M)))
(*.f64 (/.f64 D (/.f64 d D)) (/.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (*.f64 M D) (/.f64 d M)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 2 binary64) D)) (/.f64 (*.f64 M D) (/.f64 d M)))
(*.f64 (/.f64 (*.f64 M D) (/.f64 #s(literal 2 binary64) D)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 d M)))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 d M)) (/.f64 (*.f64 M D) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (*.f64 M D) (/.f64 d D)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 2 binary64) M)) (/.f64 (*.f64 M D) (/.f64 d D)))
(*.f64 (/.f64 (*.f64 M D) (/.f64 #s(literal 2 binary64) M)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 d D)))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 d D)) (/.f64 (*.f64 M D) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (neg.f64 (*.f64 M D)) d) (/.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (/.f64 (neg.f64 (*.f64 M D)) d) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal -2 binary64)))
(*.f64 (/.f64 (neg.f64 (*.f64 M D)) (/.f64 d M)) (/.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (neg.f64 (*.f64 M D)) (/.f64 #s(literal 2 binary64) D)) (/.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 d M)))
(*.f64 (/.f64 (neg.f64 (*.f64 M D)) (/.f64 d D)) (/.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (neg.f64 (*.f64 M D)) (/.f64 #s(literal 2 binary64) M)) (/.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 d D)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) #s(literal 2 binary64)) (/.f64 (/.f64 D d) (/.f64 d (*.f64 M D))))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 d #s(literal 2 binary64))) (/.f64 (/.f64 D d) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 d M)) (/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) D)) (/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 d M)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 #s(literal 2 binary64) D)) (/.f64 (/.f64 D d) (/.f64 d M)))
(*.f64 (/.f64 (/.f64 D d) (/.f64 d M)) (/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (/.f64 D d) d) (/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (/.f64 (/.f64 D d) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) d) (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 2 binary64)) (/.f64 (*.f64 M D) (/.f64 d (*.f64 M D))))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 d (*.f64 M D))))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 d M)) (/.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 2 binary64) D)) (/.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 d M)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 d D)) (/.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 2 binary64) M)) (/.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 d D)))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) d) (/.f64 M (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 2 binary64)) (/.f64 M (/.f64 d (*.f64 M D))))
(*.f64 (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (*.f64 d #s(literal 2 binary64))) (/.f64 M (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (/.f64 (/.f64 M d) d) (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (/.f64 (/.f64 M d) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (/.f64 (/.f64 M d) (/.f64 d M)) (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) D)) (/.f64 (/.f64 M d) (/.f64 d M)))
(*.f64 (/.f64 (/.f64 M d) (/.f64 d D)) (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) M)) (/.f64 (/.f64 M d) (/.f64 d D)))
(*.f64 (/.f64 (/.f64 M d) (/.f64 #s(literal 2 binary64) M)) (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d D)))
(*.f64 (/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d D)) (/.f64 (/.f64 M d) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 2 binary64)) (/.f64 (/.f64 M d) (/.f64 d (*.f64 M D))))
(*.f64 (/.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 d #s(literal 2 binary64))) (/.f64 (/.f64 M d) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) d) (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 d (*.f64 M D))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (*.f64 d #s(literal 2 binary64))) (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 d M)) (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) D)))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) D)) (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 d M)))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 d D)) (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) M)))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) M)) (/.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 d D)))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (neg.f64 d)) (*.f64 (*.f64 M D) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal -2 binary64)) (/.f64 (neg.f64 (*.f64 M D)) d))
(*.f64 (/.f64 (neg.f64 (*.f64 M D)) #s(literal -1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 D D) (*.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) (/.f64 M (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))) (*.f64 (/.f64 M d) (/.f64 M d)))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) D) (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 M d)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 (*.f64 (*.f64 M M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (/.f64 D d)) (/.f64 D d))
(*.f64 (*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) D) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 d #s(literal -2 binary64))) (neg.f64 (*.f64 M D)))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 d #s(literal 2 binary64)) M)) D)
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 M D))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64))))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (neg.f64 (*.f64 M D)))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (neg.f64 (log.f64 (*.f64 d #s(literal -2 binary64))))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (neg.f64 (log.f64 d))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 M)) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 M)))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64))))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 M D))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 #s(literal 1/2 binary64) M))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 D d))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 D d))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 #s(literal 1/2 binary64) M))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 D)) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 D #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 M d))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 M d))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 D #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))) (pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))))
#s(literal 1/2 binary64)
(exp.f64 (*.f64 (log.f64 (/.f64 l (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))))) #s(literal -1 binary64)))
(neg.f64 (*.f64 (/.f64 h (neg.f64 l)) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))))
(neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 h (neg.f64 l))))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (neg.f64 l)))
(neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) h) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) l))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) #s(literal 1 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 l h))
(/.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) l)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))))))
(/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) h) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) (neg.f64 l))
(/.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)) (*.f64 M D)))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) l) (/.f64 #s(literal 1 binary64) h))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) (/.f64 l (neg.f64 h)))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) h) (*.f64 (*.f64 d d) #s(literal 4 binary64))))) l)
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal 1 binary64)) l)
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 M D)) (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 M (*.f64 D (*.f64 M D)))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal -1 binary64)) (/.f64 l (neg.f64 h)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal -1 binary64)) (neg.f64 l))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)) (*.f64 M D)))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (neg.f64 (*.f64 M D))) (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (neg.f64 (*.f64 M D))))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 (*.f64 M D) (neg.f64 (*.f64 M D)))) (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))) (*.f64 d (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (*.f64 d (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64))) (*.f64 d d))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d)) d)
(/.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) (/.f64 l (neg.f64 h)))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)))
(/.f64 (*.f64 (neg.f64 (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (neg.f64 (*.f64 M D))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (*.f64 (*.f64 d d) #s(literal 4 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 M D) (neg.f64 (*.f64 M D))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (*.f64 d (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (*.f64 d (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (*.f64 d d))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) d)
(/.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) h) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) #s(literal -1 binary64)) l)
(pow.f64 (/.f64 l (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 l (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 h (/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) l))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 M (*.f64 D (*.f64 M D)))) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (/.f64 h l) (*.f64 M (*.f64 D (*.f64 M D)))) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 M (*.f64 (*.f64 D (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 h l)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (*.f64 M (/.f64 h l))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 l h)))
(*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 h l))
(*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 (neg.f64 h) (*.f64 (/.f64 #s(literal -1 binary64) l) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64)))))
(*.f64 (neg.f64 h) (/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (neg.f64 l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (*.f64 (/.f64 h l) (*.f64 M (*.f64 D (*.f64 M D)))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal 1/2 binary64))
(*.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) h) (*.f64 (*.f64 d d) #s(literal 4 binary64)))) (/.f64 #s(literal -1 binary64) l))
(*.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) h) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) l) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (*.f64 M (/.f64 h l))))
(*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 M D) M) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (/.f64 D d) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (*.f64 M (/.f64 h l))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) l) h)
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) l) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 #s(literal 1/2 binary64) l) (/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal -1 binary64)) (/.f64 h (neg.f64 l)))
(*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) M) (*.f64 D (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 #s(literal 1/2 binary64) M)) (*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) M)))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 M M)) (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64)))))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 M (*.f64 D (*.f64 M D)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 (*.f64 M D) M) (*.f64 d #s(literal 2 binary64)))) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 h l))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (neg.f64 l)) (neg.f64 h))
(exp.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 M) #s(literal 1 binary64) (*.f64 (log.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 M D)) #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 M D)) #s(literal 1 binary64) (*.f64 (log.f64 (*.f64 d #s(literal 2 binary64))) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) M)) #s(literal 1 binary64) (*.f64 (log.f64 (/.f64 D d)) #s(literal 1 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 D d)) #s(literal 1 binary64) (*.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) M)) #s(literal 1 binary64))))
(exp.f64 (fma.f64 (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (log.f64 (*.f64 M D)) #s(literal 1 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 d #s(literal 2 binary64))) #s(literal -1 binary64) (*.f64 (log.f64 (*.f64 M D)) #s(literal 1 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64) (*.f64 (log.f64 M) #s(literal 1 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(sqrt.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))))
(neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) #s(literal 1 binary64)))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) d)))
(/.f64 #s(literal 1/2 binary64) (/.f64 d (*.f64 M D)))
(/.f64 M (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 M D)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 d D))
(/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) M))
(/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1 binary64) (*.f64 M D)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) d)
(/.f64 #s(literal -1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 M D)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 d))
(/.f64 (/.f64 M d) (/.f64 #s(literal 2 binary64) D))
(/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d M))
(/.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 #s(literal 2 binary64) (*.f64 M D)))
(/.f64 (/.f64 (*.f64 M D) d) #s(literal 2 binary64))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 d #s(literal 2 binary64)))))
(/.f64 (exp.f64 (log.f64 (neg.f64 (*.f64 M D)))) (exp.f64 (log.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (exp.f64 (log.f64 d)))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) d)) #s(literal -2 binary64))
(/.f64 (/.f64 (neg.f64 (*.f64 M D)) d) #s(literal -2 binary64))
(/.f64 (/.f64 (neg.f64 (*.f64 M D)) #s(literal -1 binary64)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) M) (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (*.f64 (/.f64 D d) #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) M))
(/.f64 (*.f64 M #s(literal 1 binary64)) (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) M) #s(literal 1 binary64)) (/.f64 d D))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 d))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M D) d)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) M) (neg.f64 D)) (neg.f64 d))
(/.f64 (*.f64 (/.f64 D d) (neg.f64 M)) #s(literal -2 binary64))
(/.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 M) (/.f64 D d)) #s(literal -2 binary64))
(/.f64 (*.f64 (neg.f64 (*.f64 M D)) (/.f64 #s(literal 1 binary64) d)) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (neg.f64 d))
(/.f64 (*.f64 (/.f64 (*.f64 M D) d) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal -1 binary64)) d)
(pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 M D))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)) (*.f64 M D)) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) d)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M D) d))
(*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 M (*.f64 #s(literal 1/2 binary64) (/.f64 D d)))
(*.f64 M (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 D (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 D (*.f64 (neg.f64 M) (/.f64 #s(literal -1/2 binary64) d)))
(*.f64 D (*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 #s(literal 1 binary64) d)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (neg.f64 (*.f64 M D)) (/.f64 #s(literal -1/2 binary64) d))
(*.f64 (neg.f64 (*.f64 M D)) (*.f64 (/.f64 #s(literal -1/2 binary64) d) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D d))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (/.f64 D d) #s(literal 1 binary64)))
(*.f64 (/.f64 D d) (*.f64 #s(literal 1/2 binary64) M))
(*.f64 (/.f64 D d) (*.f64 (*.f64 #s(literal 1/2 binary64) M) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) M)
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) (*.f64 M #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(*.f64 (neg.f64 D) (*.f64 M (/.f64 #s(literal -1/2 binary64) d)))
(*.f64 (neg.f64 D) (/.f64 M (*.f64 d #s(literal -2 binary64))))
(*.f64 (neg.f64 M) (/.f64 D (*.f64 d #s(literal -2 binary64))))
(*.f64 (neg.f64 M) (*.f64 D (/.f64 #s(literal -1/2 binary64) d)))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 d)))
(*.f64 (/.f64 M d) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 M d))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))
(*.f64 (/.f64 #s(literal -1/2 binary64) d) (neg.f64 (*.f64 M D)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(*.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) D)
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M D) (neg.f64 d)))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) M))) (exp.f64 (log.f64 (/.f64 D d))))
(*.f64 (/.f64 D #s(literal -2 binary64)) (/.f64 (neg.f64 M) d))
(*.f64 (/.f64 D (neg.f64 d)) (/.f64 (neg.f64 M) #s(literal 2 binary64)))
(*.f64 (/.f64 M (neg.f64 d)) (/.f64 (neg.f64 D) #s(literal 2 binary64)))
(*.f64 (/.f64 M #s(literal -1 binary64)) (/.f64 (neg.f64 D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 M #s(literal -2 binary64)) (/.f64 (neg.f64 D) d))
(*.f64 (/.f64 D #s(literal -1 binary64)) (/.f64 (neg.f64 M) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 D) #s(literal 2 binary64)) (/.f64 M (neg.f64 d)))
(*.f64 (/.f64 (neg.f64 D) d) (/.f64 M #s(literal -2 binary64)))
(*.f64 (/.f64 (neg.f64 M) #s(literal 2 binary64)) (/.f64 D (neg.f64 d)))
(*.f64 (/.f64 (neg.f64 M) d) (/.f64 D #s(literal -2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) d) (*.f64 (*.f64 M D) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (neg.f64 D) #s(literal -1 binary64)) (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 M) #s(literal -1 binary64)) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 #s(literal 1 binary64) M) (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 #s(literal 1 binary64) D) (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 M d)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))

eval175.0ms (0.8%)

Memory
21.2MiB live, 252.7MiB allocated
Compiler

Compiled 30 783 to 3 503 computations (88.6% saved)

prune261.0ms (1.1%)

Memory
-39.3MiB live, 387.7MiB allocated
Pruning

29 alts after pruning (29 fresh and 0 done)

PrunedKeptTotal
New76329792
Fresh000
Picked101
Done000
Total76429793
Accuracy
84.3%
Counts
793 → 29
Alt Table
Click to see full alt table
StatusAccuracyProgram
66.5%
(*.f64 (*.f64 (pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 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))))
66.3%
(*.f64 (*.f64 (pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/8 binary64)) #s(literal 4 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))))
66.5%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 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))))
66.4%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/8 binary64)) #s(literal 4 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))))
52.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 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) l)))
63.6%
(*.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 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) d)))
51.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 h #s(literal 1/2 binary64)) l) (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64))) (*.f64 d d))))
52.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)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 (*.f64 M D) (neg.f64 (*.f64 M D)))) (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64))))))
55.6%
(*.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 h #s(literal 1/2 binary64)) l) (*.f64 M D)) (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)))))
71.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)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
52.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 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) l))))
69.8%
(*.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 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 h l)))))
65.7%
(*.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 h #s(literal 1/2 binary64)) l) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
55.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 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)))))
53.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 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
53.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)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (pow (/ (* M D) (* 2 d)) 2) (*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D)))) (/.f64 h l))))
55.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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
51.8%
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
36.1%
(*.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))))
33.1%
(*.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))))
66.6%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (pow.f64 (/.f64 d l) #s(literal 3/8 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/8 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))))
36.1%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.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))))
66.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.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))))
63.9%
(*.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d 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))))
36.1%
(*.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))))
38.7%
(*.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))))
67.0%
(*.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))))
38.7%
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 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))))
36.1%
(*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.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))))
Compiler

Compiled 2 412 to 1 444 computations (40.1% saved)

simplify192.0ms (0.8%)

Memory
23.5MiB live, 291.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff384
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff384
(*.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))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5504
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff384
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff0
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1088
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Rules
6 858×lower-*.f32
6 800×lower-*.f64
4 354×lower-/.f32
4 328×lower-/.f64
1 522×distribute-rgt-neg-in
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
079869
0143856
1308756
21100756
34978756
08396748
Stop Event
iter limit
node limit
iter limit
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 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.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 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(*.f64 M D)
M
D
(*.f64 d #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 M D))
#s(literal 1/2 binary64)
(/.f64 #s(literal 1 binary64) 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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d 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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))))
D
(*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))
(*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))
#s(literal 1/8 binary64)
(*.f64 h (*.f64 M M))
(*.f64 M M)
M
(*.f64 d (*.f64 d l))
(*.f64 d 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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) 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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))))
(*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 M D)
M
D
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64)))
(*.f64 (*.f64 d d) #s(literal 4 binary64))
(*.f64 d d)
#s(literal 4 binary64)
(/.f64 (*.f64 h #s(literal 1/2 binary64)) l)
(*.f64 h #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.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 (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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
d
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
h
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#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) #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)
(*.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 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
(*.f64 (/.f64 M d) (/.f64 M d))
(/.f64 M d)
M
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 D #s(literal 1/2 binary64))
D
#s(literal 1/2 binary64)
(/.f64 h l)
Outputs
(*.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 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 M D) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h (*.f64 M D))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l)) #s(literal 1 binary64)))
(*.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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))
(fma.f64 (*.f64 M D) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h (*.f64 M D))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l)) #s(literal 1 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))
(*.f64 D (*.f64 M (/.f64 (*.f64 D (*.f64 M (*.f64 h #s(literal 1/2 binary64)))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l))))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) (*.f64 d l)))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(*.f64 M D)
M
D
(*.f64 d #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 h (*.f64 (*.f64 M D) #s(literal 1/4 binary64))) d)
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 4 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 M D))
(*.f64 M (*.f64 D #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(/.f64 #s(literal 1 binary64) 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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 M (*.f64 #s(literal 1/8 binary64) (*.f64 h M))))) (*.f64 d (*.f64 d 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))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 M (*.f64 #s(literal 1/8 binary64) (*.f64 h M))))) (*.f64 d (*.f64 d l)))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 M (*.f64 #s(literal 1/8 binary64) (*.f64 h M))))) (*.f64 d (*.f64 d l))))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(/.f64 (*.f64 D (*.f64 D (*.f64 M (*.f64 #s(literal 1/8 binary64) (*.f64 h M))))) (*.f64 d (*.f64 d l)))
(*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))))
(*.f64 D (*.f64 D (*.f64 M (*.f64 #s(literal 1/8 binary64) (*.f64 h M)))))
D
(*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))
(*.f64 D (*.f64 M (*.f64 #s(literal 1/8 binary64) (*.f64 h M))))
(*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))
(*.f64 M (*.f64 #s(literal 1/8 binary64) (*.f64 h M)))
#s(literal 1/8 binary64)
(*.f64 h (*.f64 M M))
(*.f64 M M)
M
(*.f64 d (*.f64 d l))
(*.f64 d 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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 M D) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h (*.f64 M D))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l)) #s(literal 1 binary64)))
(*.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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))))
(fma.f64 (*.f64 M D) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h (*.f64 M D))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l)) #s(literal 1 binary64))
(*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 D (*.f64 M (/.f64 (*.f64 D (*.f64 M (*.f64 h #s(literal 1/2 binary64)))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l))))
(*.f64 M D)
M
D
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
(/.f64 (*.f64 D (*.f64 M (*.f64 h #s(literal 1/2 binary64)))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))
(/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64)))
(/.f64 #s(literal 1/4 binary64) (*.f64 d d))
(*.f64 (*.f64 d d) #s(literal 4 binary64))
(*.f64 d (*.f64 d #s(literal 4 binary64)))
(*.f64 d d)
#s(literal 4 binary64)
(/.f64 (*.f64 h #s(literal 1/2 binary64)) l)
(*.f64 h #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.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 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (*.f64 M D) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h (*.f64 M D))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l)) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 h)))
(*.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 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
d
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
h
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#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)))
(fma.f64 (*.f64 M D) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h (*.f64 M D))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) 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 D (*.f64 M (/.f64 (*.f64 D (*.f64 M (*.f64 h #s(literal 1/2 binary64)))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 D (*.f64 M (/.f64 M (*.f64 d d))))) (*.f64 D #s(literal 1/4 binary64)))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 4 binary64))))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(*.f64 M D)
M
D
(*.f64 #s(literal 2 binary64) d)
(*.f64 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 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 M D) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h (*.f64 M D))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l)) #s(literal 1 binary64)))
(*.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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))
(fma.f64 (*.f64 M D) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h (*.f64 M D))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l)) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
(*.f64 D (*.f64 M (/.f64 (*.f64 D (*.f64 M (*.f64 h #s(literal 1/2 binary64)))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D (*.f64 M (/.f64 M (*.f64 d d))))) (*.f64 D #s(literal 1/4 binary64)))
(*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 4 binary64))))
(*.f64 (/.f64 M d) (/.f64 M d))
(*.f64 M (/.f64 M (*.f64 d d)))
(/.f64 M d)
M
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 D (*.f64 D #s(literal 1/4 binary64)))
(*.f64 D #s(literal 1/2 binary64))
D
#s(literal 1/2 binary64)
(/.f64 h l)

localize355.0ms (1.5%)

Memory
3.4MiB live, 479.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy4.23284523106167
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy6.696047882813682
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy6.8609460716797335
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
accuracy7.236490176491772
(*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
accuracy2.159774863595257
(*.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))))
accuracy3.2125550455610328
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
accuracy6.696047882813682
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy6.8609460716797335
(*.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))
accuracy4.23284523106167
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy4.907131099613333
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
accuracy6.298586440790034
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))
accuracy6.696047882813682
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy3.482252880350311
(*.f64 h (*.f64 M M))
accuracy4.23284523106167
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy6.696047882813682
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy9.29061089623041
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
accuracy3.2125550455610328
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
accuracy3.218258649665251
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
accuracy4.23284523106167
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy6.696047882813682
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
72.0ms126×0valid
71.0ms130×0invalid
Compiler

Compiled 903 to 71 computations (92.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 97.0ms
ival-mult: 47.0ms (48.3% of total)
ival-div: 24.0ms (24.7% of total)
ival-pow: 11.0ms (11.3% of total)
ival-sub: 7.0ms (7.2% of total)
ival-sqrt: 3.0ms (3.1% of total)
ival-pow2: 3.0ms (3.1% of total)
ival-neg: 2.0ms (2.1% of total)
exact: 1.0ms (1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series90.0ms (0.4%)

Memory
24.5MiB live, 171.6MiB allocated
Counts
17 → 696
Calls
Call 1
Inputs
#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())
#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())
#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())
Outputs
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.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)) (patch (*.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
Calls

174 calls:

TimeVariablePointExpression
7.0ms
l
@inf
(* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))))
5.0ms
M
@0
(* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))))
4.0ms
M
@inf
(* (/ 1 (* (* d d) 4)) (* M D))
1.0ms
d
@0
(* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))))
1.0ms
d
@-inf
(* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))))

simplify362.0ms (1.6%)

Memory
19.7MiB live, 518.2MiB allocated
Algorithm
egg-herbie
Rules
5 158×lower-*.f64
5 158×lower-*.f32
4 352×lower-fma.f64
4 352×lower-fma.f32
3 526×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01359762
13739622
213439596
331549561
455019561
082649486
Stop Event
iter limit
node limit
Counts
696 → 696
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/4 (/ (* D M) (pow d 2)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 D M))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(neg.f64 (*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(neg.f64 (*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(neg.f64 (*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/4 (/ (* D M) (pow d 2)))
(*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (neg.f64 d) (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (neg.f64 d) (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (neg.f64 d) (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(neg.f64 (*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(neg.f64 (*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(neg.f64 (*.f64 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (*.f64 M M))) (*.f64 d d))

rewrite317.0ms (1.4%)

Memory
-48.0MiB live, 525.4MiB allocated
Rules
5 226×lower-/.f32
5 202×lower-/.f64
4 282×lower-*.f32
4 232×lower-*.f64
1 304×lower-pow.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
070235
0125215
1381203
22438199
08216198
Stop Event
iter limit
node limit
iter limit
Counts
17 → 1 321
Calls
Call 1
Inputs
(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 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(*.f64 h (*.f64 M M))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(*.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 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
Outputs
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64))))
(exp.f64 (-.f64 (*.f64 (log.f64 (neg.f64 d)) #s(literal 1/2 binary64)) (*.f64 (log.f64 (neg.f64 h)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (/.f64 (sqrt.f64 (neg.f64 d)) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(sqrt.f64 (/.f64 d h))
(neg.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 h d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 h)) (*.f64 (sqrt.f64 (neg.f64 d)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (neg.f64 h)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 h)))))
(/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 d))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 h))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (neg.f64 d)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(pow.f64 (/.f64 d h) #s(literal 1/2 binary64))
(pow.f64 (/.f64 h d) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 d h) (/.f64 d h)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d)))))
(*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 d)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 d))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 h)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 h))))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 d)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 d #s(literal 1 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(sqrt.f64 (/.f64 d l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 l))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 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 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 l))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 d))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) h))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) h))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) h)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) (neg.f64 h)))
(neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) (neg.f64 h)))
(/.f64 h (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) h))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) h) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M D) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d #s(literal -2 binary64)) h) (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) h)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) h) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) h)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 h #s(literal 1/2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) h))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 h #s(literal 1/2 binary64))))
(/.f64 (neg.f64 h) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) h)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) h)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 d #s(literal 2 binary64)) h))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 d #s(literal -2 binary64)) h))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) h))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 2 binary64) h)))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 h #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) M) h) (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) #s(literal 1 binary64))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) h) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) h) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 d #s(literal -2 binary64)) h)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) h)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) h)) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(pow.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) h) #s(literal -1 binary64))
(*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))
(*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) h))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64)))
(*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) h)
(*.f64 (*.f64 h #s(literal 1/2 binary64)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 h #s(literal 1/2 binary64)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) h)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h))))))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) h))))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64)))))
(*.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) (neg.f64 h))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h)) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) h)))
(*.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) h)))
(*.f64 (*.f64 (*.f64 M D) h) (/.f64 #s(literal 1/2 binary64) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) M) h) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) h) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) h) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h)) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) h)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
#s(literal 1/2 binary64)
(+.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (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))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(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))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 (/.f64 d l) (neg.f64 h))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (neg.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 (neg.f64 d)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (*.f64 (/.f64 d h) d) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 h)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h))) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (neg.f64 h))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 h)) (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 h)) (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (*.f64 (sqrt.f64 (neg.f64 h)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (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 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))) (neg.f64 (*.f64 (sqrt.f64 (neg.f64 h)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (neg.f64 h)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 h)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) #s(literal 3 binary64))) (fma.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))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (*.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))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(*.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 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (neg.f64 h)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (neg.f64 h)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #s(literal 1 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (/.f64 l (*.f64 h #s(literal 1/2 binary64)))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 l (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (*.f64 h #s(literal 1/2 binary64))) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 (*.f64 h #s(literal 1/2 binary64)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 l) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 (*.f64 h #s(literal -1/2 binary64)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l) (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (*.f64 h #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 h #s(literal -1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (neg.f64 l)) (*.f64 (*.f64 M D) (*.f64 h #s(literal -1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) #s(literal -4 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (*.f64 h #s(literal -1/2 binary64)) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (/.f64 l (*.f64 h #s(literal 1/2 binary64)))))
(/.f64 (*.f64 M D) (*.f64 (/.f64 l (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64)))))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (/.f64 l (*.f64 h #s(literal 1/2 binary64))))
(/.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (*.f64 M D)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64)))))))
(/.f64 (*.f64 D (neg.f64 M)) (neg.f64 (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (/.f64 l (*.f64 h #s(literal 1/2 binary64))))))
(/.f64 (*.f64 D (neg.f64 M)) (neg.f64 (*.f64 (/.f64 l (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(/.f64 (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))) (*.f64 d (*.f64 d #s(literal 4 binary64))))
(/.f64 (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))) (neg.f64 (*.f64 (*.f64 d d) #s(literal -4 binary64))))
(/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64)))) l)
(/.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 l #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 h #s(literal 1/2 binary64)) (*.f64 M D)) (*.f64 l (*.f64 d (*.f64 d #s(literal 4 binary64)))))
(/.f64 (*.f64 (*.f64 h #s(literal -1/2 binary64)) (*.f64 M D)) (*.f64 (neg.f64 l) (*.f64 d (*.f64 d #s(literal 4 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64))))) (neg.f64 l))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) h) (*.f64 l #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) #s(literal 1 binary64)) (/.f64 l (*.f64 h #s(literal 1/2 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 h #s(literal -1/2 binary64))) (neg.f64 l))
(/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal -1/2 binary64))) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (neg.f64 l)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))) (*.f64 d (*.f64 d #s(literal 4 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))) (*.f64 (*.f64 d d) #s(literal -4 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))) #s(literal 4 binary64))
(/.f64 (*.f64 (*.f64 h #s(literal -1/2 binary64)) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64))))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l)))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64))))) (neg.f64 (/.f64 l (*.f64 h #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))) (*.f64 (*.f64 d d) #s(literal -4 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 h #s(literal 1/2 binary64)) (*.f64 M D))) (neg.f64 (*.f64 l (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 h #s(literal -1/2 binary64)) (*.f64 M D))) (neg.f64 (*.f64 (neg.f64 l) (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64)))))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) #s(literal 1 binary64))) (neg.f64 (/.f64 l (*.f64 h #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 h #s(literal -1/2 binary64)))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal -1/2 binary64)))) (neg.f64 (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))))) (*.f64 (*.f64 d d) #s(literal -4 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))))) (neg.f64 (*.f64 (*.f64 d d) #s(literal -4 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 h #s(literal -1/2 binary64)) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))))) (neg.f64 (neg.f64 l)))
(pow.f64 (/.f64 l (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64))))) #s(literal -1 binary64))
(*.f64 h (*.f64 (/.f64 #s(literal 1/2 binary64) l) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h #s(literal 1/2 binary64)) (*.f64 M D)) (*.f64 l (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 d d)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (/.f64 l (*.f64 h #s(literal 1/2 binary64))))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 l (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 d d)) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
(*.f64 (*.f64 h #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))))
(*.f64 (/.f64 M (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))
(*.f64 (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 h #s(literal 1/2 binary64)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(*.f64 (*.f64 (*.f64 h #s(literal -1/2 binary64)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 l) (*.f64 d (*.f64 d #s(literal 4 binary64))))))
(*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (*.f64 d (*.f64 d #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) h) (/.f64 #s(literal 1/2 binary64) l))
(*.f64 (/.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 M D))
(*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (/.f64 M (*.f64 d (*.f64 d #s(literal 4 binary64))))) D)
(*.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) l)))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))) (*.f64 h #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 h #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (neg.f64 l))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal -4 binary64))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 M (*.f64 D (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))) #s(literal 1/4 binary64))
(*.f64 (*.f64 (*.f64 h #s(literal -1/2 binary64)) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal 1 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 M d)) #s(literal 2 binary64) (*.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) D)) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) D)) #s(literal 2 binary64) (*.f64 (log.f64 (/.f64 M d)) #s(literal 2 binary64))))
(exp.f64 (+.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (*.f64 M (/.f64 D d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M D) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M D) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) d) (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) (*.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) d) (*.f64 (*.f64 D (neg.f64 M)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 (*.f64 D (neg.f64 M)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 M (/.f64 D d)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 M (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (/.f64 (*.f64 M M) d) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 d M) (/.f64 d M)))
(/.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 d d) (*.f64 M M)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) d)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 (*.f64 D (neg.f64 M)) (neg.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (*.f64 D (neg.f64 M)) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) (/.f64 #s(literal 2 binary64) D))
(/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d) (/.f64 d M))
(/.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 D (neg.f64 M))) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 D (neg.f64 M))) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d #s(literal 2 binary64)) d))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d))) (*.f64 (*.f64 d #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M D)) (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d #s(literal -2 binary64)) d))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M (/.f64 D d))) (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 D (neg.f64 M))) (*.f64 d (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) (*.f64 d d))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D)) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 D (neg.f64 M))) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (neg.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) M) (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 M d)) (/.f64 #s(literal 2 binary64) D))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 d D))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 D (neg.f64 M))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) d)
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M (/.f64 D d))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) d)) d)
(/.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) d)
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (/.f64 d M))
(/.f64 (*.f64 M (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) d)
(/.f64 (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (neg.f64 d))
(/.f64 (*.f64 (/.f64 (*.f64 M M) d) (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))) #s(literal 4 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 M D))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d)))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M D))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M (/.f64 D d)))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D))) (neg.f64 (*.f64 d (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 d (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64))) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d)))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M (/.f64 D d)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) d))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 M (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M M) d) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 d))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal 1 binary64))
(pow.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal -2 binary64))
(pow.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))
(*.f64 M (*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)))
(*.f64 M (pow.f64 (*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) #s(literal 1 binary64)))
(*.f64 D (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 M D) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 2 binary64)))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 d d)) (*.f64 (*.f64 M D) (*.f64 M D)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 M d) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))
(*.f64 (/.f64 M d) (*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (/.f64 M d) (pow.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d) #s(literal 1 binary64)))
(*.f64 (/.f64 M d) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)))
(*.f64 (*.f64 #s(literal 1/2 binary64) D) (pow.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) (*.f64 d d)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) d)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))))
(*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (*.f64 D D) (pow.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (/.f64 D d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (pow.f64 (*.f64 (/.f64 D d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D D)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d) (/.f64 M d))
(*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) (*.f64 M M))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (/.f64 (*.f64 D D) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) d)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal -2 binary64)) d)))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(*.f64 (/.f64 (*.f64 D (neg.f64 M)) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 D (neg.f64 M)) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) M) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 M d)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 D d))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) D) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1/4 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) (*.f64 D D))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) #s(literal 1/2 binary64)) D)
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) D) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M (/.f64 D d))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) d)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (/.f64 M d))
(*.f64 (*.f64 M (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (/.f64 #s(literal 1 binary64) (neg.f64 d)))
(*.f64 (*.f64 (/.f64 (*.f64 M M) d) (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 D D))
(*.f64 (pow.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d) #s(literal 1 binary64)) (/.f64 M d))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (pow.f64 (*.f64 D D) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D D)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M D) (*.f64 M D)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 D D) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) M) #s(literal 1 binary64)) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D)) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 M d)) #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) M)) #s(literal 1 binary64)) (/.f64 D d))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) D) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 1/4 binary64) D) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) (*.f64 D D))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) D) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (neg.f64 h))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (neg.f64 h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))))
(/.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 l (*.f64 h #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (/.f64 l h))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) (neg.f64 (/.f64 l h)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l)
(/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 l #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (/.f64 l h))
(/.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) l)
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64)) (/.f64 l h))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (neg.f64 h)) (neg.f64 l))
(/.f64 (*.f64 (neg.f64 h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (neg.f64 h))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (neg.f64 (neg.f64 l)))
(pow.f64 (/.f64 l (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) #s(literal -1 binary64))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) h) l))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (/.f64 h l))
(*.f64 (/.f64 h l) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))
(*.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) #s(literal 1 binary64))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d)) (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 h l)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) h) l) #s(literal 1/2 binary64))
(*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (neg.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (/.f64 h l))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))
(*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d))) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64)) (/.f64 h l))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (neg.f64 h)) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 (neg.f64 h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (neg.f64 h))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (neg.f64 h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))))
(/.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 l (*.f64 h #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (/.f64 l h))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) (neg.f64 (/.f64 l h)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l)
(/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 l #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (/.f64 l h))
(/.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) l)
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64)) (/.f64 l h))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (neg.f64 h)) (neg.f64 l))
(/.f64 (*.f64 (neg.f64 h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (neg.f64 h))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (neg.f64 (neg.f64 l)))
(pow.f64 (/.f64 l (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) #s(literal -1 binary64))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) h) l))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (/.f64 h l))
(*.f64 (/.f64 h l) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))
(*.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) #s(literal 1 binary64))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d)) (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 h l)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) h) l) #s(literal 1/2 binary64))
(*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (neg.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (/.f64 h l))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))
(*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d))) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64)) (/.f64 h l))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) (neg.f64 h)) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 (neg.f64 h) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 d #s(literal -2 binary64))) (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64)))))
(neg.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M D) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1/2 binary64) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 2 binary64) (*.f64 M D)))
(/.f64 #s(literal 1/4 binary64) (/.f64 d (*.f64 M D)))
(/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) d) (/.f64 #s(literal 2 binary64) D))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) M) #s(literal 1/2 binary64)) (/.f64 d D))
(/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 M d)) (/.f64 #s(literal 2 binary64) D))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 d D))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) d)
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1/2 binary64)) d)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)))) (neg.f64 (neg.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1/2 binary64))) (neg.f64 d))
(pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64)))))
(*.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) #s(literal -1 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/4 binary64))
(*.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) d) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) M) #s(literal 1/2 binary64)) (/.f64 D d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 M d)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 D d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (pow.f64 (/.f64 d (*.f64 #s(literal 1/2 binary64) M)) #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) M)) #s(literal -1 binary64)) (/.f64 D d))
(exp.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 d)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (neg.f64 d)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(neg.f64 (/.f64 (*.f64 D (neg.f64 M)) (*.f64 d #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 d M) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) D)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 M d) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 #s(literal 1/2 binary64) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D))))
(/.f64 #s(literal 1/2 binary64) (/.f64 d (*.f64 M D)))
(/.f64 M (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (/.f64 M d) (/.f64 #s(literal 2 binary64) D))
(/.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 d M))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 d))
(/.f64 (*.f64 D (neg.f64 M)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) d)
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 1 binary64)))
(/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) M))
(/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 d D))
(/.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) D) (*.f64 (/.f64 d M) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 D (neg.f64 M))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D)) (neg.f64 d))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 d #s(literal 2 binary64)))))
(/.f64 (exp.f64 (log.f64 (*.f64 D (neg.f64 M)))) (exp.f64 (log.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (exp.f64 (log.f64 d)))
(/.f64 (exp.f64 (log.f64 (*.f64 M (/.f64 D d)))) (exp.f64 (log.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) D)) (neg.f64 (*.f64 (/.f64 d M) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 D (neg.f64 M)))) (neg.f64 (neg.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 M (/.f64 D d)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (/.f64 M d) D)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) D)) (neg.f64 (/.f64 d M)))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)))
(*.f64 M (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) D)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 1 binary64)))
(*.f64 D (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 M d) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 M d))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 d)))
(*.f64 (*.f64 D (neg.f64 M)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 D d) (*.f64 #s(literal 1/2 binary64) M))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D d))
(*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))
(*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) M)
(*.f64 (*.f64 #s(literal 1 binary64) D) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d M) #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (neg.f64 (*.f64 M (/.f64 D d))) #s(literal -1/2 binary64))
(*.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 M d) D) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D)
(*.f64 (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D)) (/.f64 #s(literal 1 binary64) (neg.f64 d)))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (exp.f64 (log.f64 (/.f64 M d))) (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) D))))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) M))) (exp.f64 (log.f64 (/.f64 D d))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 l (*.f64 d d)) (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 l (*.f64 d d)))) (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 (*.f64 l (*.f64 d d)))))
(neg.f64 (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 (*.f64 l (*.f64 d d)))))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (neg.f64 D)) (*.f64 l (*.f64 d d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (*.f64 d d)) (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 l (*.f64 d d)) (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (*.f64 d d)) (*.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d l) (*.f64 (/.f64 D d) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 D (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d d))))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) d)))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) l)))
(/.f64 D (/.f64 (*.f64 l (*.f64 d d)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))))
(/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 l (*.f64 d d)))
(/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 (*.f64 l (*.f64 d d)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 l (*.f64 d d)) (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))))))
(/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (neg.f64 D)) (neg.f64 (*.f64 l (*.f64 d d))))
(/.f64 (/.f64 D d) (/.f64 (*.f64 d l) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))))
(/.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 d l)) (/.f64 d D))
(/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) (*.f64 d l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (neg.f64 D))) (neg.f64 (neg.f64 (*.f64 l (*.f64 d d)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d))) (neg.f64 (*.f64 d l)))
(/.f64 (*.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64)) (*.f64 l (*.f64 d d)))
(/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l))
(/.f64 (*.f64 D (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 d l))) d)
(/.f64 (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)) d)
(/.f64 (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d d)) l)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) d) l)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) l) d)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (neg.f64 D)))) (neg.f64 (neg.f64 (neg.f64 (*.f64 l (*.f64 d d))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)))) (neg.f64 (neg.f64 (*.f64 d l))))
(/.f64 (neg.f64 (*.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 l (*.f64 d d))))
(/.f64 (neg.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))))) (neg.f64 (*.f64 d l)))
(/.f64 (neg.f64 (*.f64 D (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 d l)))) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l))) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d d))) (neg.f64 l))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) d)) (neg.f64 l))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) l)) (neg.f64 d))
(pow.f64 (/.f64 (*.f64 l (*.f64 d d)) (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))
(*.f64 D (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 l (*.f64 d d))))
(*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))
(*.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 d d))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 l (*.f64 d d)) (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))))))))
(*.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (neg.f64 D)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 l (*.f64 d d)))))
(*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 d l)) (/.f64 D d))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 d d))) (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 d d))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (/.f64 (*.f64 d l) (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 l (*.f64 d d))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (pow.f64 (/.f64 l (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) (/.f64 #s(literal 1 binary64) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 l (*.f64 d d))) D)
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) l))
(*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (neg.f64 D))) (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 d d))))
(*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 d l))))
(*.f64 (/.f64 D (*.f64 d l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) d))
(*.f64 (/.f64 D (*.f64 d d)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) l))
(*.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) d) (/.f64 D (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 d d)) (/.f64 D l))
(*.f64 (/.f64 (*.f64 D D) d) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d l)) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) d))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)))
(*.f64 (*.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 d d))))
(*.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 d l)))
(*.f64 (*.f64 D (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (*.f64 d l))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 (*.f64 D (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d d)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) d) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D d)) l) (/.f64 #s(literal 1 binary64) d))
(*.f64 (pow.f64 (/.f64 d (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d l) D) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d l) D) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d l) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d l) (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) D) #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))) #s(literal -1 binary64)) (pow.f64 (/.f64 l D) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(/.f64 (*.f64 M M) (/.f64 #s(literal 1 binary64) h))
(*.f64 h (*.f64 M M))
(*.f64 M (*.f64 h M))
(*.f64 (*.f64 M M) h)
(*.f64 (*.f64 h M) M)
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 d d) #s(literal -4 binary64))) (/.f64 (*.f64 M D) (*.f64 (*.f64 d d) #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (*.f64 M D)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 4 binary64)) (*.f64 M (/.f64 D d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 M D) #s(literal 1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (/.f64 (*.f64 M D) (*.f64 d d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) #s(literal -4 binary64)) (*.f64 (*.f64 M D) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 M D))))
(/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64))))
(/.f64 (*.f64 M D) (neg.f64 (*.f64 (*.f64 d d) #s(literal -4 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (*.f64 M D))))
(/.f64 (*.f64 D (neg.f64 M)) (*.f64 (*.f64 d d) #s(literal -4 binary64)))
(/.f64 (*.f64 M (/.f64 D d)) (*.f64 d #s(literal 4 binary64)))
(/.f64 (neg.f64 (*.f64 D (neg.f64 M))) (neg.f64 (*.f64 (*.f64 d d) #s(literal -4 binary64))))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) (neg.f64 (*.f64 d #s(literal 4 binary64))))
(/.f64 (*.f64 (*.f64 M D) #s(literal 1/4 binary64)) (*.f64 d d))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d d)) #s(literal 4 binary64))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1 binary64)) (*.f64 (*.f64 d d) #s(literal -4 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 M D)) #s(literal 4 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/4 binary64))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d d))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1 binary64))) (neg.f64 (*.f64 (*.f64 d d) #s(literal -4 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 M D))) #s(literal -4 binary64))
(pow.f64 (/.f64 (*.f64 d (*.f64 d #s(literal 4 binary64))) (*.f64 M D)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))))
(*.f64 M (/.f64 D (*.f64 d (*.f64 d #s(literal 4 binary64)))))
(*.f64 D (/.f64 M (*.f64 d (*.f64 d #s(literal 4 binary64)))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 d d)) (*.f64 M D))
(*.f64 (*.f64 D (neg.f64 M)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal -4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 4 binary64))))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) (*.f64 d d)))
(*.f64 (/.f64 M (*.f64 d (*.f64 d #s(literal 4 binary64)))) D)
(*.f64 (*.f64 M (/.f64 D d)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal 4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 (*.f64 M D) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 M D) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d d)) #s(literal 1/4 binary64))
(*.f64 (*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 d d)) D) M)
(*.f64 (*.f64 (*.f64 M D) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal -4 binary64))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 M D)) #s(literal 1/4 binary64))
(exp.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 d)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (neg.f64 d)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(neg.f64 (/.f64 (*.f64 D (neg.f64 M)) (*.f64 d #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 d M) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) D)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 M d) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 #s(literal 1/2 binary64) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D))))
(/.f64 #s(literal 1/2 binary64) (/.f64 d (*.f64 M D)))
(/.f64 M (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (/.f64 M d) (/.f64 #s(literal 2 binary64) D))
(/.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 d M))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 d))
(/.f64 (*.f64 D (neg.f64 M)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) d)
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 1 binary64)))
(/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) M))
(/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 d D))
(/.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) D) (*.f64 (/.f64 d M) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 D (neg.f64 M))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D)) (neg.f64 d))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 d #s(literal 2 binary64)))))
(/.f64 (exp.f64 (log.f64 (*.f64 D (neg.f64 M)))) (exp.f64 (log.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (exp.f64 (log.f64 d)))
(/.f64 (exp.f64 (log.f64 (*.f64 M (/.f64 D d)))) (exp.f64 (log.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) D)) (neg.f64 (*.f64 (/.f64 d M) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 D (neg.f64 M)))) (neg.f64 (neg.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 M (/.f64 D d)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (/.f64 M d) D)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) D)) (neg.f64 (/.f64 d M)))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)))
(*.f64 M (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) D)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 1 binary64)))
(*.f64 D (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 M d) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 M d))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 d)))
(*.f64 (*.f64 D (neg.f64 M)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 D d) (*.f64 #s(literal 1/2 binary64) M))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D d))
(*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))
(*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) M)
(*.f64 (*.f64 #s(literal 1 binary64) D) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d M) #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (neg.f64 (*.f64 M (/.f64 D d))) #s(literal -1/2 binary64))
(*.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 M d) D) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D)
(*.f64 (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D)) (/.f64 #s(literal 1 binary64) (neg.f64 d)))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (exp.f64 (log.f64 (/.f64 M d))) (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) D))))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) M))) (exp.f64 (log.f64 (/.f64 D d))))
(+.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (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 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(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 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 (/.f64 d l) (neg.f64 h))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (neg.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.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 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 (neg.f64 d)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (*.f64 (/.f64 d h) d) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h))) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 h)) (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 h)) (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 h)) (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l)))) (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (*.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l)))) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))))) (neg.f64 (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))))) (neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 h)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (neg.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (fma.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))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))))) (*.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 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (neg.f64 h)) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h)))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (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 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 h)))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) l) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))) (*.f64 h (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))))) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) #s(literal 1 binary64))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal 1 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 M d)) #s(literal 2 binary64) (*.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) D)) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) D)) #s(literal 2 binary64) (*.f64 (log.f64 (/.f64 M d)) #s(literal 2 binary64))))
(exp.f64 (+.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal -2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (*.f64 M (/.f64 D d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M D) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M D) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) d) (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) (*.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) d) (*.f64 (*.f64 D (neg.f64 M)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 D (neg.f64 M)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 (*.f64 D (neg.f64 M)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 M (/.f64 D d)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 M (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (/.f64 (*.f64 M M) d) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))
(/.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 d M) (/.f64 d M)))
(/.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 d d) (*.f64 M M)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) d)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 (*.f64 D (neg.f64 M)) (neg.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (*.f64 D (neg.f64 M)) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) (/.f64 #s(literal 2 binary64) D))
(/.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d) (/.f64 d M))
(/.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 D (neg.f64 M))) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 D (neg.f64 M))) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d #s(literal 2 binary64)) d))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d))) (*.f64 (*.f64 d #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M D)) (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d #s(literal -2 binary64)) d))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M (/.f64 D d))) (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 D (neg.f64 M))) (*.f64 d (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) (*.f64 d d))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D)) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 D (neg.f64 M))) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (neg.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) M) (/.f64 (*.f64 d #s(literal 2 binary64)) D))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 M d)) (/.f64 #s(literal 2 binary64) D))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 d D))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 D (neg.f64 M))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) d)
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M (/.f64 D d))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) d)) d)
(/.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 D (neg.f64 M)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) d)
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (/.f64 d M))
(/.f64 (*.f64 M (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) d)
(/.f64 (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (neg.f64 d))
(/.f64 (*.f64 (/.f64 (*.f64 M M) d) (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))) #s(literal 4 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 M D))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d)))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M D))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M (/.f64 D d)))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D))) (neg.f64 (*.f64 d (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 d (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64))) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d)))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 D (neg.f64 M)))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M (/.f64 D d)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) d))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 D (neg.f64 M)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 M (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M M) d) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 d))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal 1 binary64))
(pow.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal -2 binary64))
(pow.f64 (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))))
(*.f64 M (*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)))
(*.f64 M (pow.f64 (*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) #s(literal 1 binary64)))
(*.f64 D (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 M D) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 2 binary64)))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 d d)) (*.f64 (*.f64 M D) (*.f64 M D)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 M d) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d))
(*.f64 (/.f64 M d) (*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (/.f64 M d) (pow.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d) #s(literal 1 binary64)))
(*.f64 (/.f64 M d) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)))
(*.f64 (*.f64 #s(literal 1/2 binary64) D) (pow.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) (*.f64 d d)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) d)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))))
(*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (*.f64 D D) (pow.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (/.f64 D d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (pow.f64 (*.f64 (/.f64 D d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D D)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d) (/.f64 M d))
(*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d))) (*.f64 M M))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (/.f64 (*.f64 D D) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) d)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))))))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal -2 binary64)) d)))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64)))))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(*.f64 (/.f64 (*.f64 D (neg.f64 M)) (*.f64 d #s(literal 2 binary64))) (/.f64 (*.f64 D (neg.f64 M)) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) M) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 M d)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 D d))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) D) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1/4 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) (*.f64 D D))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) #s(literal 1/2 binary64)) D)
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) D) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 D (neg.f64 M))) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M (/.f64 D d))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 D (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 M M) d)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 D (neg.f64 M)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (/.f64 M d))
(*.f64 (*.f64 M (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d)) (/.f64 #s(literal 1 binary64) (neg.f64 d)))
(*.f64 (*.f64 (/.f64 (*.f64 M M) d) (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 D D))
(*.f64 (pow.f64 (/.f64 (*.f64 M (*.f64 D (*.f64 #s(literal 1/4 binary64) D))) d) #s(literal 1 binary64)) (/.f64 M d))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (pow.f64 (*.f64 D D) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D D)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M D) (*.f64 M D)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 D D) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) M) #s(literal 1 binary64)) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 M D)) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 M d)) #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) M)) #s(literal 1 binary64)) (/.f64 D d))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) D) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 1/4 binary64) D) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) (*.f64 D D))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 d d)) D) #s(literal 1 binary64)) #s(literal 1/2 binary64))

eval378.0ms (1.6%)

Memory
10.0MiB live, 610.2MiB allocated
Compiler

Compiled 98 985 to 5 673 computations (94.3% saved)

prune459.0ms (2%)

Memory
0.8MiB live, 766.3MiB allocated
Pruning

47 alts after pruning (47 fresh and 0 done)

PrunedKeptTotal
New2 439442 483
Fresh21324
Picked505
Done000
Total2 465472 512
Accuracy
93.3%
Counts
2 512 → 47
Alt Table
Click to see full alt table
StatusAccuracyProgram
36.0%
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
41.0%
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
47.3%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
20.0%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
47.6%
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
26.7%
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
33.0%
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
41.0%
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
66.3%
(*.f64 (*.f64 (pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/8 binary64)) #s(literal 4 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))))
63.6%
(*.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 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) d)))
65.7%
(*.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 h #s(literal 1/2 binary64)) l) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
57.8%
(*.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 M D) (*.f64 h (*.f64 (/.f64 #s(literal 1/2 binary64) l) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))))))))
58.8%
(*.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 M D) #s(approx (* (* (/ 1 (* (* d d) 4)) (* M D)) (/ (* h 1/2) l)) (/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))))))
57.4%
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) d) (/.f64 D (*.f64 d l))))))
41.6%
(*.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 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
31.3%
(*.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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
30.9%
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
26.8%
(*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
26.5%
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
55.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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
51.8%
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
26.4%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
41.6%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
71.9%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
53.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
55.2%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
51.8%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
2.1%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d l))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
39.7%
(*.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 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
36.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)) (*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))) (/.f64 h l))))
31.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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
37.9%
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (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))))
36.1%
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.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))))
30.2%
(*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
32.5%
(*.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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
30.5%
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
53.1%
(*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
47.3%
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
20.1%
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
29.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 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h))
18.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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
15.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 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
15.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 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
21.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
28.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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
26.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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
2.0%
#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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))))
Compiler

Compiled 3 638 to 2 248 computations (38.2% saved)

simplify281.0ms (1.2%)

Memory
-11.3MiB live, 343.8MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff384
(*.f64 (/.f64 M d) (/.f64 M d))
cost-diff384
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff0
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
cost-diff320
(*.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))))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff0
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))
cost-diff0
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))
cost-diff0
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h)))
cost-diff0
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
cost-diff0
(/.f64 #s(literal 1 binary64) (*.f64 h l))
cost-diff0
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
cost-diff0
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
cost-diff0
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
cost-diff384
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1088
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Rules
6 418×lower-*.f32
6 356×lower-*.f64
3 912×lower-/.f32
3 880×lower-/.f64
1 712×lower--.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
087849
0150824
1314792
21050792
34375792
47345792
08186787
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l)))
(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)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(*.f64 M D)
M
D
(*.f64 d #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 M D))
#s(literal 1/2 binary64)
(/.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 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 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h)))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))
#s(literal 1 binary64)
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))
(*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))
(*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))
(*.f64 h (*.f64 M M))
h
(*.f64 M M)
M
(*.f64 D #s(literal 1/8 binary64))
D
#s(literal 1/8 binary64)
(/.f64 D (*.f64 l (*.f64 d d)))
(*.f64 l (*.f64 d d))
l
(*.f64 d d)
d
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 l d))
(/.f64 l d)
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.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))))
(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)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(sqrt.f64 (/.f64 l d))
(/.f64 l d)
l
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))))
D
(*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))
(*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))
#s(literal 1/8 binary64)
(*.f64 h (*.f64 M M))
(*.f64 M M)
M
(*.f64 d (*.f64 d l))
(*.f64 d 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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#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 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
(*.f64 (/.f64 M d) (/.f64 M d))
(/.f64 M d)
M
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 D #s(literal 1/2 binary64))
D
#s(literal 1/2 binary64)
(/.f64 h l)
Outputs
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (fma.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 #s(literal 2 binary64) l))) (*.f64 h (*.f64 (/.f64 (*.f64 M D) d) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))
(fma.f64 (/.f64 (*.f64 M D) (*.f64 d (*.f64 #s(literal 2 binary64) l))) (*.f64 h (*.f64 (/.f64 (*.f64 M D) d) #s(literal -1/4 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 M D) (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)))) (*.f64 d (*.f64 #s(literal 2 binary64) l)))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
(/.f64 (*.f64 M D) (*.f64 d (*.f64 #s(literal 2 binary64) l)))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(*.f64 M (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 M D)
M
D
(*.f64 d #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
(*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))
(*.f64 #s(literal 1/2 binary64) (*.f64 M D))
(*.f64 (*.f64 M D) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(/.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 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 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))) (*.f64 d (*.f64 d l))))))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))) (*.f64 d (*.f64 d l)))))
#s(literal 1 binary64)
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))) (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))
(/.f64 (*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))) (*.f64 d (*.f64 d l)))
(*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64)))
(*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))
(*.f64 h (*.f64 M M))
h
(*.f64 M M)
M
(*.f64 D #s(literal 1/8 binary64))
D
#s(literal 1/8 binary64)
(/.f64 D (*.f64 l (*.f64 d d)))
(/.f64 D (*.f64 d (*.f64 d l)))
(*.f64 l (*.f64 d d))
(*.f64 d (*.f64 d l))
l
(*.f64 d d)
d
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(sqrt.f64 (/.f64 l d))
(/.f64 l d)
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 l d)))
(*.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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(sqrt.f64 (/.f64 l d))
(/.f64 l d)
l
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))) (*.f64 d (*.f64 d l)))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))) (*.f64 d (*.f64 d l))))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(/.f64 (*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))) (*.f64 d (*.f64 d l)))
(*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))))
(*.f64 D (*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))))
D
(*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))
(*.f64 h (*.f64 D (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))
(*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))
(*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))
#s(literal 1/8 binary64)
(*.f64 h (*.f64 M M))
(*.f64 M M)
M
(*.f64 d (*.f64 d l))
(*.f64 d 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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 D D) #s(literal -1/4 binary64)) (/.f64 (*.f64 h (*.f64 M M)) (*.f64 d (*.f64 d l)))) #s(literal 1 binary64))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d l))) (sqrt.f64 h))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#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 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 D D) #s(literal -1/4 binary64)) (/.f64 (*.f64 h (*.f64 M M)) (*.f64 d (*.f64 d l)))) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 D D) #s(literal 1/4 binary64)) (/.f64 (*.f64 h (*.f64 M M)) (*.f64 d (*.f64 d l)))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D #s(literal 1/2 binary64))) (*.f64 D #s(literal 1/4 binary64)))
(*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
(*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 D D) #s(literal 1/4 binary64)))
(*.f64 (/.f64 M d) (/.f64 M d))
(/.f64 (*.f64 M M) (*.f64 d d))
(/.f64 M d)
M
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (*.f64 D D) #s(literal 1/4 binary64))
(*.f64 D #s(literal 1/2 binary64))
D
#s(literal 1/2 binary64)
(/.f64 h l)

localize333.0ms (1.4%)

Memory
57.2MiB live, 439.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy3.413197930452025
(*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
accuracy5.6562925538102915
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
accuracy6.079556473702259
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy8.380720211385727
(*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
accuracy3.413197930452025
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
accuracy6.143133400836406
(sqrt.f64 (/.f64 l d))
accuracy7.803783934262206
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy7.983327140130973
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
accuracy3.745404214101614
(*.f64 l (*.f64 d d))
accuracy6.143133400836406
(sqrt.f64 (/.f64 l d))
accuracy6.266578854011292
(*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))
accuracy7.803783934262207
(sqrt.f64 (/.f64 d h))
accuracy0.125
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
accuracy0.17534442363150754
(/.f64 #s(literal 1 binary64) (*.f64 h l))
accuracy5.367121997017853
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
accuracy16.082616530578917
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
accuracy4.332762390946216
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
accuracy4.333004117398462
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
accuracy6.079556473702259
(sqrt.f64 (/.f64 d l))
accuracy7.803783934262206
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
125.0ms130×0valid
79.0ms126×0invalid
Compiler

Compiled 768 to 77 computations (90% saved)

Precisions
Click to see histograms. Total time spent on operations: 168.0ms
ival-mult: 81.0ms (48.3% of total)
ival-div: 57.0ms (34% of total)
ival-pow: 14.0ms (8.3% of total)
ival-sqrt: 9.0ms (5.4% of total)
ival-sub: 4.0ms (2.4% of total)
ival-pow2: 3.0ms (1.8% of total)
exact: 1.0ms (0.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series112.0ms (0.5%)

Memory
0.4MiB live, 200.3MiB allocated
Counts
27 → 1 092
Calls
Call 1
Inputs
#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())
#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())
#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())
#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())
#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())
Outputs
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (patch (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) (patch #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor 0 M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor 0 M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor 0 M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor 0 M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor inf M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor inf M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor inf M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor inf M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor -inf M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor -inf M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor -inf M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor -inf M) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor inf d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor inf d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor inf d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor inf d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor -inf d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor -inf d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor -inf d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) (pow d 2)) (taylor -inf d) (#s(alt (*.f64 (/.f64 M d) (/.f64 M d)) (patch (*.f64 (/.f64 M d) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) (patch (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor 0 l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor 0 l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor 0 l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor 0 l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor inf l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor inf l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor inf l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor inf l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor -inf l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor -inf l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor -inf l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor -inf l) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor 0 d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor 0 d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor 0 d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor 0 d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor inf d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor inf d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor inf d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor inf d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor -inf d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor -inf d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor -inf d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* (pow d 2) l) (taylor -inf d) (#s(alt (*.f64 l (*.f64 d d)) (patch (*.f64 l (*.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) (patch (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) (patch (*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
Calls

273 calls:

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

simplify328.0ms (1.4%)

Memory
-43.8MiB live, 521.0MiB allocated
Algorithm
egg-herbie
Rules
8 408×lower-*.f64
8 408×lower-*.f32
3 200×lower-fma.f64
3 200×lower-fma.f32
2 384×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
024616237
170615903
2251415819
3557915761
0811715515
Stop Event
iter limit
node limit
Counts
1 092 → 1 092
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(sqrt (/ d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(sqrt (/ d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(/ (pow M 2) (pow d 2))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2)))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(* (sqrt (/ l d)) (pow (sqrt -1) 2))
(* (sqrt (/ l d)) (pow (sqrt -1) 2))
(* (sqrt (/ l d)) (pow (sqrt -1) 2))
(* (sqrt (/ l d)) (pow (sqrt -1) 2))
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* (pow d 2) l)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/4 (/ (* D (* M h)) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 D (*.f64 (/.f64 M (*.f64 d l)) #s(literal 1/2 binary64)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (*.f64 d h)))) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (*.f64 d h)))) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (*.f64 d h)))) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d h)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (*.f64 d h))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (*.f64 d h))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (*.f64 d h))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) l)) (neg.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) l)) (neg.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) l)) (neg.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 d h)) l (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 d h)) l (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 d h)) l (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) l)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal -1/8 binary64) (*.f64 l (*.f64 d d))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 D D))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 D D))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 D D))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal -1/8 binary64) (*.f64 l (*.f64 d d))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 D D))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 D D))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 D D))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal -1/8 binary64) (*.f64 l (*.f64 d d))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal -1/8 binary64) (*.f64 l (*.f64 d d))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal -1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal -1/8 binary64) (*.f64 l (*.f64 d d))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal -1/8 binary64) (*.f64 l (*.f64 d d))))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal -1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 l (*.f64 d d))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(/ (pow M 2) (pow d 2))
(/.f64 (*.f64 M M) (*.f64 d d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 l d))
(* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 l d))
(* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 l d))
(* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(sqrt (/ l d))
(sqrt.f64 (/.f64 l d))
(* (sqrt (/ l d)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 l d)))
(* (sqrt (/ l d)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 l d)))
(* (sqrt (/ l d)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 l d)))
(* (sqrt (/ l d)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 l d)))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* (pow d 2) l)
(*.f64 l (*.f64 d d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D (*.f64 D (*.f64 h (*.f64 M M)))) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) d)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))

rewrite391.0ms (1.7%)

Memory
17.5MiB live, 740.0MiB allocated
Rules
5 664×lower-/.f32
5 632×lower-/.f64
3 776×lower-*.f32
3 722×lower-*.f64
1 592×frac-2neg
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
083448
0142417
1475398
23189390
08707388
Stop Event
iter limit
node limit
iter limit
Counts
27 → 1 771
Calls
Call 1
Inputs
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 M D) (*.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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h)))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))
(*.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 (*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))
(*.f64 (/.f64 M d) (/.f64 M d))
(sqrt.f64 (/.f64 d l))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d h))
(*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))
(sqrt.f64 (/.f64 l d))
(*.f64 l (*.f64 d d))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
(*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
Outputs
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64))))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 h) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 h))) (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 h))))
(sqrt.f64 (/.f64 d h))
(neg.f64 (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 h))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 h d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64)) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal -1 binary64))) (sqrt.f64 (neg.f64 h)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 h)))))
(pow.f64 (/.f64 d h) #s(literal 1/2 binary64))
(pow.f64 (/.f64 h d) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 d h) (/.f64 d h)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (sqrt.f64 d) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 h))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #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)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))
(*.f64 (pow.f64 (*.f64 d #s(literal 1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (neg.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) h)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) (/.f64 #s(literal -1 binary64) h)))
(neg.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) (/.f64 #s(literal -1 binary64) h)))
(/.f64 h (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) h))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (/.f64 #s(literal 1 binary64) h)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M D) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) h)) (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) h))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) h)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) h)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) h)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 (/.f64 #s(literal 1 binary64) h) #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (/.f64 #s(literal 1 binary64) h))))
(/.f64 (neg.f64 h) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64))))
(/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 d h) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (*.f64 (/.f64 d h) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (neg.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) h)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) h) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) h) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64))) (neg.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) h))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) h))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) h))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) h)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) h)) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(pow.f64 (/.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (/.f64 #s(literal 1 binary64) h)) #s(literal -1 binary64))
(*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))
(*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1 binary64) h)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) h))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M D) (*.f64 (/.f64 d h) #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal -1 binary64)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 d h) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) h)
(*.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) h)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 #s(literal 1/2 binary64) d)) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 (/.f64 d h) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) h)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) h)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (/.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) h)) (/.f64 #s(literal 1/2 binary64) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 #s(literal 1 binary64) h)) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
#s(literal 1/2 binary64)
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 M D))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 l)) (/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) l))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l))) (/.f64 (*.f64 M D) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 l (*.f64 d #s(literal -2 binary64)))) (/.f64 (*.f64 M D) (*.f64 l (*.f64 d #s(literal -2 binary64)))))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) l))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) l) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (*.f64 d #s(literal -2 binary64))) (*.f64 M (neg.f64 D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d l) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 M (/.f64 D d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 (*.f64 M D) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) l) (*.f64 (*.f64 M (neg.f64 D)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 (*.f64 M (neg.f64 D)) (/.f64 #s(literal 1 binary64) l))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) l))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 M (/.f64 D d)) (/.f64 #s(literal 1 binary64) l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 (*.f64 M D) l)))
(/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) l)
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (neg.f64 (neg.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 M D))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) l)))
(/.f64 (*.f64 M (neg.f64 D)) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(/.f64 (*.f64 M (neg.f64 D)) (*.f64 l (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (*.f64 d l)))
(/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) (neg.f64 l))
(/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) (neg.f64 (neg.f64 (neg.f64 l))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d l))
(/.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))
(/.f64 (*.f64 M (/.f64 D d)) (*.f64 l #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal 2 binary64)) l))
(/.f64 (*.f64 (*.f64 M (neg.f64 D)) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal -2 binary64)) l))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (*.f64 d l))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) l))
(/.f64 (neg.f64 (*.f64 M (neg.f64 D))) (neg.f64 (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l))))
(/.f64 (neg.f64 (*.f64 M (neg.f64 D))) (neg.f64 (*.f64 l (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) (neg.f64 (*.f64 l #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64)) l)
(/.f64 (*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) l)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M (neg.f64 D)) (/.f64 #s(literal 1 binary64) l)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) l)) d)
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (/.f64 #s(literal 1 binary64) l)) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 M D) l) (*.f64 d #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l)) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (neg.f64 D)) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) l)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64))) (neg.f64 (*.f64 d l)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64))) (neg.f64 (*.f64 #s(literal 2 binary64) l)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) l))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (neg.f64 D)) (/.f64 #s(literal 1 binary64) l))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) l))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (/.f64 #s(literal 1 binary64) l))) #s(literal -2 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) l)) (*.f64 d #s(literal -2 binary64)))
(pow.f64 (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 M D)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) l) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 M (/.f64 D (*.f64 (*.f64 d #s(literal 2 binary64)) l))))
(*.f64 M (*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) l)))
(*.f64 M (/.f64 D (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(*.f64 M (/.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) l))
(*.f64 D (/.f64 M (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(*.f64 (*.f64 M D) (/.f64 (/.f64 #s(literal 1/2 binary64) d) l))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 M d) (*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 #s(literal 1 binary64) l)))
(*.f64 (/.f64 M d) (/.f64 (*.f64 #s(literal 1/2 binary64) D) l))
(*.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (/.f64 D d) (/.f64 #s(literal 1 binary64) l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 (/.f64 D d) l))
(*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (/.f64 D l) (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 M l) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 l (*.f64 M D)) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (/.f64 l (*.f64 M (neg.f64 D))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (pow.f64 (/.f64 l (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (pow.f64 (/.f64 l (*.f64 M (/.f64 D d))) #s(literal -1 binary64)) #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 d (sqrt.f64 (*.f64 h l))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/2 binary64)))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)))))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)))))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)) (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d))) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d))) #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)))))
(exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h))) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h)))) (/.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h))) (/.f64 (sqrt.f64 d) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h))))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
(/.f64 d (sqrt.f64 (*.f64 h l)))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 (/.f64 h d)) (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 (/.f64 h d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) (*.f64 d #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) (*.f64 #s(literal 1 binary64) d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (/.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 h d)) (neg.f64 (sqrt.f64 (/.f64 l d)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h))) (neg.f64 (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h)) (neg.f64 (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h (/.f64 l d))) (*.f64 (sqrt.f64 d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l (/.f64 h d))) (*.f64 (sqrt.f64 d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (neg.f64 (sqrt.f64 (/.f64 l d)))) (*.f64 (sqrt.f64 d) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 (/.f64 l d))) (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (neg.f64 (sqrt.f64 (/.f64 l d)))) (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (*.f64 #s(literal 1 binary64) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 h d) l)) (*.f64 #s(literal 1 binary64) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h))) (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (neg.f64 (sqrt.f64 h))) (*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))) (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 (/.f64 d h) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 d (/.f64 d h)))))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 l d) h)))
(/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 h d)) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 (/.f64 h d))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d)))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 l d) h))))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64)) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64)) (sqrt.f64 (*.f64 l (/.f64 h d))))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (*.f64 (sqrt.f64 h) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal -1 binary64)) (*.f64 (neg.f64 (sqrt.f64 h)) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) h)))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d)) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h))))
(/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (neg.f64 (sqrt.f64 h))))
(/.f64 (*.f64 d #s(literal 1 binary64)) (sqrt.f64 (*.f64 h l)))
(/.f64 (*.f64 #s(literal 1 binary64) d) (sqrt.f64 (*.f64 h l)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)))
(/.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 d h))) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 d h))) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) d)) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (neg.f64 (*.f64 d #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 l d) h))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 h d) l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 h (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 l (/.f64 h d)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) d)) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64))) (neg.f64 (*.f64 (sqrt.f64 h) (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal -1 binary64))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 d h)))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 d (sqrt.f64 l)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d h) d))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 d h)))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 d (/.f64 d h)))) (neg.f64 (sqrt.f64 l)))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 h l)) (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 1/2 binary64))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) d)
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 l d))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.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 h) #s(literal 1/4 binary64)) (/.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (sqrt.f64 (/.f64 l d))))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))))
(*.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.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 (*.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 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (/.f64 (/.f64 d h) l)) (sqrt.f64 d))
(exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 h l))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 h l)) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 h l))) #s(literal -1 binary64)))
(fabs.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 h (neg.f64 l)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 h l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (*.f64 h (neg.f64 l)))))
(pow.f64 (*.f64 h l) #s(literal -1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (*.f64 h l)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (*.f64 h l) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l))) #s(literal 1/4 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (/.f64 l #s(literal 1 binary64)) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (pow.f64 (*.f64 h l) #s(literal -1/4 binary64)) (pow.f64 (*.f64 h l) #s(literal -1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 h l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 h l))))
(*.f64 (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(exp.f64 (neg.f64 (log.f64 (*.f64 h l))))
(exp.f64 (fma.f64 (neg.f64 (log.f64 (*.f64 h l))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 (*.f64 h l))) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 l)) (/.f64 (/.f64 #s(literal 1 binary64) h) (neg.f64 l)))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 h l)))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 h (neg.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 h (/.f64 #s(literal 1 binary64) l)))
(/.f64 (/.f64 #s(literal 1 binary64) h) l)
(/.f64 (/.f64 #s(literal 1 binary64) h) (neg.f64 (neg.f64 l)))
(/.f64 #s(literal -1 binary64) (*.f64 h (neg.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (*.f64 h (neg.f64 l)))))
(/.f64 (/.f64 #s(literal -1 binary64) h) (neg.f64 l))
(/.f64 (/.f64 #s(literal 1 binary64) l) h)
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l)) (neg.f64 h))
(pow.f64 (*.f64 h l) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (*.f64 h l)) #s(literal -2 binary64))
(pow.f64 (neg.f64 (*.f64 h (neg.f64 l))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 h l) (*.f64 h l)) #s(literal -1/2 binary64))
(pow.f64 (*.f64 (sqrt.f64 (*.f64 h l)) (sqrt.f64 (*.f64 h l))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 h l)))
(*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(+.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (/.f64 l d)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) d (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 l d))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 l d))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (/.f64 d h) l)) (sqrt.f64 d) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 l d))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 d (sqrt.f64 (*.f64 h l))))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h)))) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d h))) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h))) (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 l d)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (*.f64 (sqrt.f64 (/.f64 l d)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h))))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d h)))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h)))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 d (sqrt.f64 (*.f64 h l))))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #s(literal 3 binary64))) (fma.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 l d))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 l d))))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(+.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(+.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(-.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (sqrt.f64 (/.f64 h d))))
(-.f64 (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d))) (/.f64 (/.f64 (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d))))
(-.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 h d))) (/.f64 (/.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 h d))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 d) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 d) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 h))) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 h))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 d) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (pow.f64 (*.f64 d #s(literal 1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (pow.f64 (*.f64 d #s(literal 1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(fma.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 h d)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 h d)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 d)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 (neg.f64 (sqrt.f64 d)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h d))) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 h))) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 h d))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 h))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h d)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (*.f64 (sqrt.f64 (/.f64 h d)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 h) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (*.f64 (sqrt.f64 h) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (*.f64 (neg.f64 (sqrt.f64 h)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (*.f64 (neg.f64 (sqrt.f64 h)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 d)) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (neg.f64 (sqrt.f64 d))) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 h))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 h d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 d)) (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (neg.f64 (sqrt.f64 d))) (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 h))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d h))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 d)) (sqrt.f64 h))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 h d)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 h d)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d h)))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h)))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (neg.f64 (*.f64 (sqrt.f64 h) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h d)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 d))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 h d)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 d))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 d))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 d h)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d h)) (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d h)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 d h)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d h)) (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h)))) (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h)))))))
(*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1 binary64) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(+.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (/.f64 (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (/.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (-.f64 #s(literal 1 binary64) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(fma.f64 #s(literal -1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 #s(literal 1 binary64) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 #s(literal 1 binary64) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (-.f64 #s(literal 1 binary64) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 #s(literal 1 binary64) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (neg.f64 (-.f64 #s(literal 1 binary64) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 (fma.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (fma.f64 (/.f64 (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (/.f64 (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (/.f64 (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (fma.f64 (/.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))
(*.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))
(*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/2 binary64)))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)))))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)))))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)) (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d))) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d))) #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)))))
(exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h))) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h)))) (/.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h))) (/.f64 (sqrt.f64 d) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h))))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
(/.f64 d (sqrt.f64 (*.f64 h l)))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 (/.f64 h d)) (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 (/.f64 h d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) (*.f64 d #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) (*.f64 #s(literal 1 binary64) d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (/.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 h d)) (neg.f64 (sqrt.f64 (/.f64 l d)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h))) (neg.f64 (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h)) (neg.f64 (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h (/.f64 l d))) (*.f64 (sqrt.f64 d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l (/.f64 h d))) (*.f64 (sqrt.f64 d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (neg.f64 (sqrt.f64 (/.f64 l d)))) (*.f64 (sqrt.f64 d) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 (/.f64 l d))) (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (neg.f64 (sqrt.f64 (/.f64 l d)))) (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (*.f64 #s(literal 1 binary64) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 h d) l)) (*.f64 #s(literal 1 binary64) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h))) (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (neg.f64 (sqrt.f64 h))) (*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))) (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 (/.f64 d h) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 d (/.f64 d h)))))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 l d) h)))
(/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 h d)) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 (/.f64 h d))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d)))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 l d) h))))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64)) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64)) (sqrt.f64 (*.f64 l (/.f64 h d))))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (*.f64 (sqrt.f64 h) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal -1 binary64)) (*.f64 (neg.f64 (sqrt.f64 h)) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) h)))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d)) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h))))
(/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (neg.f64 (sqrt.f64 h))))
(/.f64 (*.f64 d #s(literal 1 binary64)) (sqrt.f64 (*.f64 h l)))
(/.f64 (*.f64 #s(literal 1 binary64) d) (sqrt.f64 (*.f64 h l)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)))
(/.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 d h))) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (sqrt.f64 h))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 d h))) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) d)) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (neg.f64 (*.f64 d #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 l d) h))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 h d) l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 h (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 l (/.f64 h d)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) d)) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64))) (neg.f64 (*.f64 (sqrt.f64 h) (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal -1 binary64))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 d h)))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 d (sqrt.f64 l)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d h)) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d h) d))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 d h)))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 d (/.f64 d h)))) (neg.f64 (sqrt.f64 l)))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 h l)) (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 1/2 binary64))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) d)
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 l d))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.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 h) #s(literal 1/4 binary64)) (/.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (sqrt.f64 (/.f64 l d))))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))))
(*.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.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 (*.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 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (/.f64 (/.f64 d h) l)) (sqrt.f64 d))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(+.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (/.f64 l d)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) d (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 l d))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 l d))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (/.f64 d h) l)) (sqrt.f64 d) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 l d))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 d (sqrt.f64 (*.f64 h l))))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h)))) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d h))) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h))) (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 l d)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (*.f64 (sqrt.f64 (/.f64 l d)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h))))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d h)))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (neg.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h)))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (/.f64 d (sqrt.f64 (*.f64 h l))))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #s(literal 3 binary64))) (fma.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 l d))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))))
(*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 d h)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 l d))))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 l d)) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 l))) (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 l))))
(sqrt.f64 (/.f64 d l))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (neg.f64 (sqrt.f64 l))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 l))))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (sqrt.f64 (/.f64 l d))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 d) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 l d))))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (/.f64 l d) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 l d) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (neg.f64 h))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 l h))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) (neg.f64 (/.f64 l h)))
(/.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) l)
(/.f64 (neg.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (/.f64 l h))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 l h))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (neg.f64 h)) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) l)
(/.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (neg.f64 h))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 l)))
(pow.f64 (/.f64 l (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) h) l))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l)))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l))
(*.f64 (/.f64 h l) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 h l)))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) h) l) #s(literal 1/2 binary64))
(*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))))
(*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d))) (*.f64 #s(literal 1/4 binary64) (*.f64 D D)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (/.f64 h l))
(exp.f64 (*.f64 (log.f64 (/.f64 M d)) #s(literal 2 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)) (*.f64 (log.f64 d) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d M) (/.f64 d M)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 M M)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 d M) (/.f64 d M)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d d) (*.f64 M M)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (/.f64 M d)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 d M) d) (*.f64 #s(literal 1 binary64) M)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 d M) (neg.f64 d)) (*.f64 #s(literal 1 binary64) (neg.f64 M))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (/.f64 d M)) (*.f64 M #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (neg.f64 d)) (*.f64 M (neg.f64 M))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 d) (/.f64 d M)) (*.f64 (neg.f64 M) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 d) d) (*.f64 (neg.f64 M) M)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 (/.f64 M d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (/.f64 M d) (neg.f64 M))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (neg.f64 M) (/.f64 M d))))
(/.f64 (*.f64 M M) (*.f64 d d))
(/.f64 (/.f64 M d) (/.f64 d M))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 d M) (/.f64 d M))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d d) (*.f64 M M))))
(/.f64 (*.f64 M (/.f64 M d)) d)
(/.f64 (*.f64 #s(literal 1 binary64) M) (*.f64 (/.f64 d M) d))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 M)) (*.f64 (/.f64 d M) (neg.f64 d)))
(/.f64 (*.f64 M #s(literal 1 binary64)) (*.f64 d (/.f64 d M)))
(/.f64 (*.f64 M (neg.f64 M)) (*.f64 d (neg.f64 d)))
(/.f64 (*.f64 (neg.f64 M) #s(literal 1 binary64)) (*.f64 (neg.f64 d) (/.f64 d M)))
(/.f64 (*.f64 (neg.f64 M) M) (*.f64 (neg.f64 d) d))
(/.f64 (neg.f64 (*.f64 M M)) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 M (/.f64 M d))) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 M d)) (neg.f64 (/.f64 d M)))
(/.f64 (*.f64 (/.f64 M d) #s(literal 1 binary64)) (/.f64 d M))
(/.f64 (*.f64 (/.f64 M d) (neg.f64 M)) (neg.f64 d))
(/.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) M)) (neg.f64 (*.f64 (/.f64 d M) d)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 M))) (neg.f64 (*.f64 (/.f64 d M) (neg.f64 d))))
(/.f64 (neg.f64 (*.f64 M #s(literal 1 binary64))) (neg.f64 (*.f64 d (/.f64 d M))))
(/.f64 (neg.f64 (*.f64 M (neg.f64 M))) (neg.f64 (*.f64 d (neg.f64 d))))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 d) (/.f64 d M))))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) M)) (neg.f64 (*.f64 (neg.f64 d) d)))
(/.f64 (neg.f64 (neg.f64 (*.f64 M M))) (neg.f64 (neg.f64 (*.f64 d d))))
(/.f64 (neg.f64 (neg.f64 (*.f64 M (/.f64 M d)))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 (/.f64 M d) #s(literal 1 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 (/.f64 M d) (neg.f64 M))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (/.f64 M d))) (neg.f64 (neg.f64 d)))
(pow.f64 (/.f64 M d) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 M M) (*.f64 d d)) #s(literal 1 binary64))
(pow.f64 (/.f64 d M) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 d M) (/.f64 d M)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 M M)) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 M d))) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M M) (*.f64 d d)))
(*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 M d)))
(*.f64 M (/.f64 M (*.f64 d d)))
(*.f64 M (/.f64 (/.f64 M d) d))
(*.f64 (*.f64 M M) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 M M) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal 2 binary64)))
(*.f64 (/.f64 M d) (/.f64 M d))
(*.f64 (*.f64 M (/.f64 M d)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (*.f64 M M))
(*.f64 (/.f64 M (neg.f64 d)) (/.f64 M (neg.f64 d)))
(*.f64 (/.f64 (neg.f64 M) d) (/.f64 (neg.f64 M) d))
(*.f64 (exp.f64 (log.f64 (/.f64 M d))) (exp.f64 (log.f64 (/.f64 M d))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 l d)) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 l))) (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 l))))
(sqrt.f64 (/.f64 d l))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d))))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (neg.f64 (sqrt.f64 l))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 l))))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (sqrt.f64 (/.f64 l d)) (sqrt.f64 (/.f64 l d))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 d) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 l d))))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (/.f64 l d) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 l d) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 d #s(literal -2 binary64))) (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64)))))
(neg.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M D) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal -2 binary64))))
(/.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal 2 binary64))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) d)
(/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal -2 binary64)) d)
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)))) (neg.f64 (neg.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal -2 binary64))) (neg.f64 d))
(pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))))
(*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))
(*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d)))
(*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/4 binary64))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) d) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) #s(literal 2 binary64)) (/.f64 D d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 M d)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 D d))
(*.f64 (pow.f64 (/.f64 d (*.f64 #s(literal 1/2 binary64) M)) #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) M)) #s(literal -1 binary64)) (/.f64 D d))
(exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 d)) (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d))
(neg.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 M D) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 d M) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) D)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 M d) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D))))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 (*.f64 M (neg.f64 D)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 d))
(/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) d)
(/.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) D) (*.f64 (/.f64 d M) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 M (neg.f64 D))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) #s(literal -2 binary64))
(/.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) D)) (/.f64 d M))
(/.f64 (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D)) (neg.f64 d))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 d #s(literal 2 binary64)))))
(/.f64 (exp.f64 (log.f64 (*.f64 M (neg.f64 D)))) (exp.f64 (log.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (exp.f64 (log.f64 d)))
(/.f64 (exp.f64 (log.f64 (*.f64 M (/.f64 D d)))) (exp.f64 (log.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) D)) (neg.f64 (*.f64 (/.f64 d M) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 M (neg.f64 D)))) (neg.f64 (neg.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 M (/.f64 D d)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (/.f64 M d) D)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) D))) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (*.f64 #s(literal 1/2 binary64) D))) (neg.f64 (neg.f64 d)))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))
(*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)))
(*.f64 M (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) D)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 1 binary64)))
(*.f64 D (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (/.f64 M d) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 #s(literal 1/2 binary64) D) (/.f64 M d))
(*.f64 (*.f64 M (neg.f64 D)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 D d) (*.f64 #s(literal 1/2 binary64) M))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D d))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))
(*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) M)
(*.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))))
(*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D)
(*.f64 (*.f64 (/.f64 M d) D) #s(literal 1/2 binary64))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 M (neg.f64 D)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (exp.f64 (log.f64 (/.f64 M d))) (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) D))))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) M))) (exp.f64 (log.f64 (/.f64 D d))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64))))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 h) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 h))) (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 h))))
(sqrt.f64 (/.f64 d h))
(neg.f64 (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 h))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 h d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64)) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal -1 binary64))) (sqrt.f64 (neg.f64 h)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(literal 1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 h)))))
(pow.f64 (/.f64 d h) #s(literal 1/2 binary64))
(pow.f64 (/.f64 h d) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 d h) (/.f64 d h)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (sqrt.f64 d) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 h))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #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)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))
(*.f64 (pow.f64 (*.f64 d #s(literal 1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 d (*.f64 d l)))) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (neg.f64 (*.f64 d (*.f64 d l)))))
(neg.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (neg.f64 (*.f64 d (*.f64 d l)))))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D)) (*.f64 d (*.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d (*.f64 d l)) D) (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d l) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d (*.f64 d l)) D) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 D (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) l)))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d d))))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) d)))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l)))
(/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 (*.f64 d (*.f64 d l)) D))
(/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D)) (neg.f64 (*.f64 d (*.f64 d l))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) (*.f64 d l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D))) (neg.f64 (neg.f64 (*.f64 d (*.f64 d l)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d))) (neg.f64 (*.f64 d l)))
(/.f64 (neg.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) D)))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 d (*.f64 d l)) D))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D l)) (*.f64 d d))
(/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) #s(literal 1 binary64)) (*.f64 d (*.f64 d l)))
(/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (/.f64 (*.f64 d (*.f64 d l)) D))
(/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d))
(/.f64 (*.f64 D (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l))) d)
(/.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) l) (*.f64 d d))
(/.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d d)) l)
(/.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d l)) d)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) d) l)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l) d)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D)))) (neg.f64 (neg.f64 (neg.f64 (*.f64 d (*.f64 d l))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)))) (neg.f64 (neg.f64 (*.f64 d l))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) D)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D l))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) #s(literal 1 binary64))) (neg.f64 (*.f64 d (*.f64 d l))))
(/.f64 (neg.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))) (neg.f64 (*.f64 d l)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))) (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) D)))
(/.f64 (neg.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 D (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)))) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) l)) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d d))) (neg.f64 l))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d l))) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) d)) (neg.f64 l))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l)) (neg.f64 d))
(pow.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64))
(*.f64 h (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l)))))))
(*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))
(*.f64 D (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))))
(*.f64 D (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))))
(*.f64 (*.f64 M M) (*.f64 h (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l)))))))
(*.f64 (*.f64 h (*.f64 M M)) (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 D #s(literal 1/8 binary64)) (*.f64 (*.f64 h (*.f64 M M)) (/.f64 D (*.f64 d (*.f64 d l)))))
(*.f64 (/.f64 D (*.f64 d (*.f64 d l))) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))
(*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D (/.f64 D (*.f64 d (*.f64 d l)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 d (*.f64 d l)))))
(*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)) (/.f64 D d))
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (/.f64 (*.f64 d l) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) l) (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l)))))
(*.f64 (*.f64 D D) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 h (*.f64 (*.f64 M M) D)) (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l)))))
(*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l)))))))
(*.f64 (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))) (*.f64 h (*.f64 M M)))
(*.f64 (/.f64 D l) (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d d)))
(*.f64 (/.f64 D l) (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) (/.f64 #s(literal 1 binary64) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (pow.f64 (/.f64 l (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d d)) (/.f64 D l))
(*.f64 (/.f64 D (*.f64 d d)) (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) l) (/.f64 D (*.f64 d d)))
(*.f64 (/.f64 D (*.f64 d l)) (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) d))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) d) (/.f64 D (*.f64 d l)))
(*.f64 (/.f64 (*.f64 D D) d) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 D D) l) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) l))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d l)) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) d))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)) (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)))
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) h) (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))))
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) D) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) (*.f64 h (*.f64 M M))) (*.f64 D #s(literal 1/8 binary64)))
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) D)
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) (*.f64 h (*.f64 (*.f64 M M) D))) #s(literal 1/8 binary64))
(*.f64 (pow.f64 (/.f64 d (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d l) D) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d l) D) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d l) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)) (/.f64 D l))
(*.f64 (pow.f64 (/.f64 l (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d d) D) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) D) #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 l (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d l) (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d))))
(exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)))))
(exp.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 l d))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64)))
(sqrt.f64 (/.f64 l d))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d)) (sqrt.f64 l)))
(/.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 d l))))
(/.f64 (sqrt.f64 l) (sqrt.f64 d))
(/.f64 (sqrt.f64 l) (*.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 l d))) #s(literal -1 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 d)))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))) #s(literal 1 binary64))
(/.f64 (neg.f64 (sqrt.f64 l)) (neg.f64 (sqrt.f64 d)))
(/.f64 (neg.f64 (sqrt.f64 l)) (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 d))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 d l))))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 (neg.f64 d))))
(/.f64 (sqrt.f64 (*.f64 l #s(literal 1 binary64))) (sqrt.f64 d))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 l))) (neg.f64 (sqrt.f64 (neg.f64 d))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 l))) (neg.f64 (neg.f64 (sqrt.f64 d))))
(pow.f64 (/.f64 l d) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64))
(pow.f64 (/.f64 d l) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 d l)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal -1/4 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 l d) (/.f64 l d)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 l d))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(*.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 l) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) (sqrt.f64 l))
(*.f64 (sqrt.f64 (neg.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d))))
(*.f64 (pow.f64 (/.f64 l d) #s(literal 1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(*.f64 d (*.f64 d l))
(*.f64 l (*.f64 d d))
(*.f64 (*.f64 d d) l)
(*.f64 (*.f64 d l) d)
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 d (*.f64 d l)))) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (neg.f64 (*.f64 d (*.f64 d l)))))
(neg.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (neg.f64 (*.f64 d (*.f64 d l)))))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D)) (*.f64 d (*.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d (*.f64 d l)) D) (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d l) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d (*.f64 d l)) D) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 D (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) l)))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d d))))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) d)))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l)))
(/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 (*.f64 d (*.f64 d l)) D))
(/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D)) (neg.f64 (*.f64 d (*.f64 d l))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) (*.f64 d l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D))) (neg.f64 (neg.f64 (*.f64 d (*.f64 d l)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d))) (neg.f64 (*.f64 d l)))
(/.f64 (neg.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) D)))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 d (*.f64 d l)) D))
(/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D l)) (*.f64 d d))
(/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) #s(literal 1 binary64)) (*.f64 d (*.f64 d l)))
(/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (/.f64 (*.f64 d (*.f64 d l)) D))
(/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d))
(/.f64 (*.f64 D (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l))) d)
(/.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) l) (*.f64 d d))
(/.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d d)) l)
(/.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d l)) d)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) d) l)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l) d)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D)))) (neg.f64 (neg.f64 (neg.f64 (*.f64 d (*.f64 d l))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)))) (neg.f64 (neg.f64 (*.f64 d l))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) D)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D l))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) #s(literal 1 binary64))) (neg.f64 (*.f64 d (*.f64 d l))))
(/.f64 (neg.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))) (neg.f64 (*.f64 d l)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))) (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) D)))
(/.f64 (neg.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 D (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)))) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) l)) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d d))) (neg.f64 l))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d l))) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) d)) (neg.f64 l))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l)) (neg.f64 d))
(pow.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64))
(*.f64 h (*.f64 (*.f64 M M) (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l)))))))
(*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))
(*.f64 D (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))))
(*.f64 D (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))))
(*.f64 (*.f64 M M) (*.f64 h (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l)))))))
(*.f64 (*.f64 h (*.f64 M M)) (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 D #s(literal 1/8 binary64)) (*.f64 (*.f64 h (*.f64 M M)) (/.f64 D (*.f64 d (*.f64 d l)))))
(*.f64 (/.f64 D (*.f64 d (*.f64 d l))) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))))
(*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D (/.f64 D (*.f64 d (*.f64 d l)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (neg.f64 D)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 d (*.f64 d l)))))
(*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d l)) (/.f64 D d))
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (/.f64 (*.f64 d l) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) l) (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l)))))
(*.f64 (*.f64 D D) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 h (*.f64 (*.f64 M M) D)) (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l)))))
(*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l)))))))
(*.f64 (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))) (*.f64 h (*.f64 M M)))
(*.f64 (/.f64 D l) (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d d)))
(*.f64 (/.f64 D l) (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) (/.f64 #s(literal 1 binary64) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (pow.f64 (/.f64 l (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d d)) (/.f64 D l))
(*.f64 (/.f64 D (*.f64 d d)) (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) l) (/.f64 D (*.f64 d d)))
(*.f64 (/.f64 D (*.f64 d l)) (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) d))
(*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) d) (/.f64 D (*.f64 d l)))
(*.f64 (/.f64 (*.f64 D D) d) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 D D) l) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) l))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d l)) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) d))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)) (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)))
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) h) (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))))
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) D) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))))
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) (*.f64 h (*.f64 M M))) (*.f64 D #s(literal 1/8 binary64)))
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) D)
(*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) (*.f64 h (*.f64 (*.f64 M M) D))) #s(literal 1/8 binary64))
(*.f64 (pow.f64 (/.f64 d (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d l) D) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d l) D) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d l) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)) (/.f64 D l))
(*.f64 (pow.f64 (/.f64 l (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d d) D) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) D) #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 l (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d l) (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))) #s(literal 1 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 M d)) #s(literal 2 binary64) (*.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) D)) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) D)) #s(literal 2 binary64) (*.f64 (log.f64 (/.f64 M d)) #s(literal 2 binary64))))
(exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (*.f64 d #s(literal -2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 M (neg.f64 D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) d) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) (*.f64 (*.f64 M D) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M D) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M D) (*.f64 M (neg.f64 D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) d) (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) (*.f64 (*.f64 M (neg.f64 D)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M (neg.f64 D)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) d) (*.f64 (*.f64 M (neg.f64 D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 M (neg.f64 D)) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (neg.f64 D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 M M) (*.f64 #s(literal 1/4 binary64) (*.f64 D D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64))) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64))) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (neg.f64 D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M (neg.f64 D)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M (/.f64 D d)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M (/.f64 M d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 (*.f64 M (neg.f64 D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 M (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 M (/.f64 M d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D)))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))))
(/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 M D)) (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 M (neg.f64 D))) (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) d))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 M (/.f64 D d))) (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M (neg.f64 D))) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d #s(literal 2 binary64)) d))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d))) (*.f64 (*.f64 d #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M (neg.f64 D)) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal -2 binary64)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 (*.f64 (*.f64 M (neg.f64 D)) (*.f64 M D)) (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 M (neg.f64 D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d #s(literal -2 binary64)) d))
(/.f64 (*.f64 (*.f64 M (neg.f64 D)) (*.f64 M (/.f64 D d))) (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (*.f64 d (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (neg.f64 D))) (*.f64 d (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 d d))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D)) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (neg.f64 D))) (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M (neg.f64 D))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) d)
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M (/.f64 D d))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M (/.f64 M d))) d)
(/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M (neg.f64 D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) d)
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d)) (/.f64 d M))
(/.f64 (*.f64 M (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d)) d)
(/.f64 (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 M (/.f64 M d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d)
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))) #s(literal 4 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 M D))) (neg.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 M (neg.f64 D)))) (neg.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) d)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 M (/.f64 D d)))) (neg.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 M D))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 M (neg.f64 D)))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 M (/.f64 D d)))) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (neg.f64 D)) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (neg.f64 D)) (*.f64 M D))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (neg.f64 D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (neg.f64 D)) (*.f64 M (/.f64 D d)))) (neg.f64 (*.f64 (*.f64 d #s(literal -2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64))) (neg.f64 (*.f64 d (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D))) (neg.f64 (*.f64 d (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (neg.f64 D)))) (neg.f64 (*.f64 d (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/4 binary64) (*.f64 D D)))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M (/.f64 D d)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1 binary64))) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M D))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (neg.f64 D)))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 d #s(literal -2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d)))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M D))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M (neg.f64 D)))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M (/.f64 D d)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 M (/.f64 M d)))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))) (*.f64 d #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (neg.f64 D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d))) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 M (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 M d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D)))) (neg.f64 d))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal 1 binary64))
(pow.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))))
(*.f64 M (*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))))
(*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d)))
(*.f64 M (pow.f64 (*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal 1 binary64)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d)) #s(literal 1 binary64)))
(*.f64 D (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))))
(*.f64 (*.f64 M D) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))))
(*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 d d)))))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 2 binary64)))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 d d)))) #s(literal 1 binary64)))
(*.f64 (/.f64 M d) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d))
(*.f64 (/.f64 M d) (*.f64 (*.f64 #s(literal 1/2 binary64) D) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))))
(*.f64 (/.f64 M d) (pow.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d) #s(literal 1 binary64)))
(*.f64 (/.f64 M d) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) D) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D)))
(*.f64 (*.f64 #s(literal 1/2 binary64) D) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D)))
(*.f64 (*.f64 #s(literal 1/2 binary64) D) (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d) (/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) d))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (/.f64 D d) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (pow.f64 (*.f64 (/.f64 D d) (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d)))) #s(literal 1 binary64)))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))))
(*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (*.f64 D D) (pow.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 D D) (pow.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) #s(literal 2 binary64)))
(*.f64 (*.f64 D (*.f64 #s(literal 1/2 binary64) D)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d)))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d) (/.f64 M d))
(*.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 d d)))) (*.f64 M M))
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 (*.f64 M D) (*.f64 M D)))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))))
(*.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 d d))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) M) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M D)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (/.f64 M d)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 D d))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) D) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1/4 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D (*.f64 #s(literal 1/2 binary64) D))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 1/2 binary64)) D)
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D)) D) #s(literal 1/2 binary64))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 D D))
(*.f64 (pow.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) d) #s(literal 1 binary64)) (/.f64 M d))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (pow.f64 (*.f64 D D) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 D (*.f64 #s(literal 1/2 binary64) D)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M M)) (*.f64 d d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 D D) (/.f64 #s(literal 1 binary64) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M D) (*.f64 M D)) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 d d))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) M) #s(literal 1 binary64)) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 M D)) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (/.f64 M d)) #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) D))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M (/.f64 D d))) (*.f64 #s(literal 1/2 binary64) M)) #s(literal 1 binary64)) (/.f64 D d))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) D) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 1/4 binary64) D) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D (*.f64 #s(literal 1/2 binary64) D))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) D)) D) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(+.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l)))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) d (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 d l))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 (/.f64 l d))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 l d))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (/.f64 d h) l)) (sqrt.f64 d) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 d (sqrt.f64 l)) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64))) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h)) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))) (/.f64 d (sqrt.f64 l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.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 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))) (/.f64 d (sqrt.f64 (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l)))) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 l))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))) (/.f64 d (sqrt.f64 l))) (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l)))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 l)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))) (/.f64 d (sqrt.f64 l)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))) (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64)))) (*.f64 h (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))))) (*.f64 l l))) (/.f64 d (sqrt.f64 (*.f64 h l))))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) #s(literal 1/2 binary64))) (/.f64 h l) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (+.f64 (pow.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))) #s(literal 3 binary64))) (fma.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l) (/.f64 d (sqrt.f64 (*.f64 h l))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l)) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l))) (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) h) l))))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))

eval565.0ms (2.4%)

Memory
17.3MiB live, 511.1MiB allocated
Compiler

Compiled 106 248 to 6 572 computations (93.8% saved)

prune962.0ms (4.1%)

Memory
11.2MiB live, 861.2MiB allocated
Pruning

64 alts after pruning (63 fresh and 1 done)

PrunedKeptTotal
New2 951533 004
Fresh321042
Picked415
Done000
Total2 987643 051
Accuracy
94.2%
Counts
3 051 → 64
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.9%
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
58.8%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
44.9%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
55.3%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d l)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
49.7%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
28.0%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 d))))
52.6%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
54.5%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
40.7%
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 l d)))
22.5%
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
22.8%
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
26.7%
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
32.1%
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
24.3%
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
25.5%
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
33.0%
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
65.7%
(*.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 h #s(literal 1/2 binary64)) l) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
41.6%
(*.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 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
30.9%
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
26.8%
(*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
53.1%
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) h) (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64))))))))
41.6%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
70.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) h))))
70.4%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)))))
53.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
55.2%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
39.7%
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
39.8%
(*.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)) (*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))) #s(literal 1/4 binary64))) (/.f64 h l))))
31.0%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
41.1%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
30.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
51.8%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
71.9%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
2.1%
(*.f64 (*.f64 #s(approx (pow (/ d h) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d h)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
28.6%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
20.5%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
15.3%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
16.3%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
21.7%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
2.1%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d)))))
25.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 d (sqrt.f64 l)) (sqrt.f64 h)))
25.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 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
41.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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
17.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 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
17.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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
19.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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d)))))
19.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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
26.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 d (sqrt.f64 (*.f64 h l))))
21.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(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 d))))
26.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d)))
33.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d)))))
15.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 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
41.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 l)) (sqrt.f64 (/.f64 d h))))
28.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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
2.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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 l)))))
26.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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l)))))
26.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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
26.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 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) h))))
26.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 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l))))
26.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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.f64 #s(literal 1 binary64) l))))))
26.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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
23.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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
25.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 d (exp.f64 (*.f64 (log.f64 (*.f64 h l)) #s(literal -1/2 binary64)))))
26.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
Compiler

Compiled 3 808 to 2 390 computations (37.2% saved)

simplify321.0ms (1.4%)

Memory
-11.7MiB live, 185.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
cost-diff0
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
cost-diff0
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
cost-diff0
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
cost-diff0
(/.f64 d l)
cost-diff0
(sqrt.f64 (/.f64 d l))
cost-diff0
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
cost-diff0
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
cost-diff0
(sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d)))
cost-diff0
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
cost-diff0
#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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
cost-diff320
(*.f64 #s(literal 1 binary64) (neg.f64 d))
cost-diff0
(*.f64 h l)
cost-diff0
(sqrt.f64 (*.f64 h l))
cost-diff0
(/.f64 d (sqrt.f64 (*.f64 h l)))
cost-diff0
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
cost-diff128
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))
cost-diff320
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
cost-diff384
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
cost-diff1088
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
Rules
9 442×lower-*.f32
9 388×lower-*.f64
1 872×lower-/.f32
1 840×lower-/.f64
1 738×distribute-rgt-neg-in
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
087785
0144759
1285715
2849715
35448715
08149709
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))
#s(literal 1 binary64)
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(*.f64 M D)
M
D
(*.f64 d #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 M D))
#s(literal 1/2 binary64)
(/.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 d (sqrt.f64 (*.f64 h l))))
(/.f64 d (sqrt.f64 (*.f64 h l)))
d
(sqrt.f64 (*.f64 h l))
(*.f64 h 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d)))
(*.f64 #s(literal 1 binary64) (neg.f64 d))
#s(literal 1 binary64)
(neg.f64 d)
d
(sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))
(*.f64 (/.f64 h d) (neg.f64 l))
(/.f64 h d)
h
(neg.f64 l)
l
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
d
l
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
h
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))
#s(literal 1 binary64)
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))))
D
(*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))
(*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))
#s(literal 1/8 binary64)
(*.f64 h (*.f64 M M))
(*.f64 M M)
M
(*.f64 d (*.f64 d l))
(*.f64 d l)
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
h
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h))))
(/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))
#s(literal 1 binary64)
(*.f64 d (*.f64 (*.f64 d d) h))
d
(*.f64 (*.f64 d d) h)
(*.f64 d d)
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))
(*.f64 #s(literal -1/8 binary64) (*.f64 D D))
#s(literal -1/8 binary64)
(*.f64 D D)
D
(/.f64 (*.f64 M M) l)
(*.f64 M M)
M
l
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(/.f64 d (*.f64 h (*.f64 h h)))
(*.f64 h (*.f64 h h))
(*.f64 h h)
(sqrt.f64 (/.f64 l d))
(/.f64 l d)
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (*.f64 h (*.f64 M D)) (*.f64 d (*.f64 l #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 M D) d) #s(literal -1/4 binary64)) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))
(fma.f64 (/.f64 (*.f64 h (*.f64 M D)) (*.f64 d (*.f64 l #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 M D) d) #s(literal -1/4 binary64)) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 M D) (*.f64 (/.f64 (*.f64 M D) d) (*.f64 #s(literal 1/4 binary64) h))) (*.f64 d (*.f64 l #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
(/.f64 (*.f64 M D) (*.f64 d (*.f64 l #s(literal 2 binary64))))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(*.f64 M D)
M
D
(*.f64 d #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
(*.f64 (/.f64 (*.f64 M D) d) (*.f64 #s(literal 1/4 binary64) h))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) d)
(*.f64 #s(literal 1/2 binary64) (*.f64 M D))
(*.f64 M (*.f64 D #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(/.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 d (sqrt.f64 (*.f64 h l))))
(/.f64 d (sqrt.f64 (*.f64 h l)))
d
(sqrt.f64 (*.f64 h l))
(*.f64 h 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d)) (sqrt.f64 (/.f64 (*.f64 h (neg.f64 l)) d))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 (*.f64 h (neg.f64 l)) d)))
(sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d)))
(sqrt.f64 (neg.f64 d))
(*.f64 #s(literal 1 binary64) (neg.f64 d))
(neg.f64 d)
#s(literal 1 binary64)
(neg.f64 d)
d
(sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))
(sqrt.f64 (/.f64 (*.f64 h (neg.f64 l)) d))
(*.f64 (/.f64 h d) (neg.f64 l))
(/.f64 (*.f64 h (neg.f64 l)) d)
(/.f64 h d)
h
(neg.f64 l)
l
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D (*.f64 h (*.f64 M (*.f64 M D))))) (*.f64 d (*.f64 d l))))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
d
l
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
h
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D (*.f64 h (*.f64 M (*.f64 M D))))) (*.f64 d (*.f64 d l)))))
#s(literal 1 binary64)
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D (*.f64 h (*.f64 M (*.f64 M D))))) (*.f64 d (*.f64 d l))))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D (*.f64 h (*.f64 M (*.f64 M D))))) (*.f64 d (*.f64 d l)))
(*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))))
(*.f64 #s(literal 1/8 binary64) (*.f64 D (*.f64 h (*.f64 M (*.f64 M D)))))
D
(*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))
(*.f64 h (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 M M))))
(*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M)))
#s(literal 1/8 binary64)
(*.f64 h (*.f64 M M))
(*.f64 M M)
M
(*.f64 d (*.f64 d l))
(*.f64 d l)
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d (*.f64 d h))))) (*.f64 #s(literal -1/8 binary64) (*.f64 D (/.f64 (*.f64 M (*.f64 M D)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d (*.f64 d h))))) (*.f64 #s(literal -1/8 binary64) (*.f64 D (/.f64 (*.f64 M (*.f64 M D)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d (*.f64 d h))))) (*.f64 #s(literal -1/8 binary64) (*.f64 D (/.f64 (*.f64 M (*.f64 M D)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
h
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d (*.f64 d h))))) (*.f64 #s(literal -1/8 binary64) (*.f64 D (/.f64 (*.f64 M (*.f64 M D)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d (*.f64 d h)))))
(/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))
(/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d (*.f64 d h))))
#s(literal 1 binary64)
(*.f64 d (*.f64 (*.f64 d d) h))
(*.f64 d (*.f64 d (*.f64 d h)))
d
(*.f64 (*.f64 d d) h)
(*.f64 d (*.f64 d h))
(*.f64 d d)
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))
(*.f64 #s(literal -1/8 binary64) (*.f64 D (/.f64 (*.f64 M (*.f64 M D)) l)))
(*.f64 #s(literal -1/8 binary64) (*.f64 D D))
(*.f64 D (*.f64 D #s(literal -1/8 binary64)))
#s(literal -1/8 binary64)
(*.f64 D D)
D
(/.f64 (*.f64 M M) l)
(*.f64 M M)
M
l
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(/.f64 d (*.f64 h (*.f64 h h)))
(*.f64 h (*.f64 h h))
(*.f64 h h)
(sqrt.f64 (/.f64 l d))
(/.f64 l d)

localize413.0ms (1.8%)

Memory
-22.3MiB live, 351.3MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy8.097942777273117
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h))))
accuracy8.500171775385393
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))
accuracy9.765146847626378
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
accuracy15.411729663669266
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
accuracy3.482252880350311
(*.f64 h (*.f64 M M))
accuracy4.2328452310616695
(sqrt.f64 (/.f64 d h))
accuracy6.696047882813685
(sqrt.f64 (/.f64 d l))
accuracy9.29061089623041
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
accuracy0.15300751953688405
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
accuracy1.5971461250240961
(*.f64 (/.f64 h d) (neg.f64 l))
accuracy8.201633942517029
(sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))
accuracy15.82122056257093
#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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
accuracy0
(*.f64 h l)
accuracy0.09375
(/.f64 d (sqrt.f64 (*.f64 h l)))
accuracy7.543550836201753
(sqrt.f64 (*.f64 h l))
accuracy29.876164229016954
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
accuracy3.2125550455610328
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
accuracy3.218258649665251
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
accuracy4.2328452310616695
(sqrt.f64 (/.f64 d h))
accuracy6.696047882813685
(sqrt.f64 (/.f64 d l))
Samples
174.0ms130×0invalid
73.0ms126×0valid
Compiler

Compiled 670 to 81 computations (87.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 209.0ms
ival-div: 68.0ms (32.5% of total)
ival-mult: 56.0ms (26.8% of total)
ival-add: 54.0ms (25.8% of total)
ival-sqrt: 12.0ms (5.7% of total)
ival-pow: 11.0ms (5.3% of total)
ival-pow2: 3.0ms (1.4% of total)
ival-sub: 2.0ms (1% of total)
ival-neg: 2.0ms (1% of total)
exact: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series193.0ms (0.8%)

Memory
24.4MiB live, 262.6MiB allocated
Counts
29 → 1 140
Calls
Call 1
Inputs
#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())
#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())
#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())
#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())
#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())
#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())
#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())
#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())
#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())
Outputs
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 h l))) (patch (/.f64 d (sqrt.f64 (*.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 h l)) (patch (sqrt.f64 (*.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 h l) (patch (*.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (*.f64 #s(literal 1 binary64) (neg.f64 d)) (patch (*.f64 #s(literal 1 binary64) (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (patch #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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) (patch (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (sqrt -1))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (sqrt -1))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (sqrt -1))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (sqrt -1))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (patch (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor 0 d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor 0 d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor 0 d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor 0 d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor inf d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor inf d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor inf d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor inf d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor -inf d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor -inf d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor -inf d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor -inf d) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor 0 l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor 0 l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor 0 l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor 0 l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor inf l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor inf l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor inf l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor inf l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor -inf l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor -inf l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor -inf l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (/ d l) (taylor -inf l) (#s(alt (/.f64 d l) (patch (/.f64 d l) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))))) (taylor -inf h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))))) (taylor -inf h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))))) (taylor -inf h) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (patch (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))) (taylor 0 d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ d h))))) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ d h))))) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ d h))))) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d (pow h 3)))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 5) h))))))) (taylor inf d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d (pow h 3)))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 5) h))))))) (taylor inf d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d (pow h 3)))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 5) h))))))) (taylor inf d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 5) h))))) (* (sqrt (/ 1 (* d (pow h 3)))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 5) h))))) (* (sqrt (/ 1 (* d (pow h 3)))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 5) h))))) (* (sqrt (/ 1 (* d (pow h 3)))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) (pow h 2)) (taylor 0 h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) (pow h 2)) (taylor 0 h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) (pow h 2)) (taylor 0 h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))) (taylor inf h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor inf h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor inf h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor inf h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (taylor -inf h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor -inf h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor -inf h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor -inf h) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor 0 D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor 0 D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor 0 D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))) (taylor inf D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3)))))) (taylor inf D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3)))))) (taylor inf D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3)))))) (taylor inf D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))) (taylor -inf D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3)))))) (taylor -inf D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3)))))) (taylor -inf D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3)))))) (taylor -inf D) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor 0 M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor 0 M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor 0 M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))) (taylor inf M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3)))))) (taylor inf M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3)))))) (taylor inf M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3)))))) (taylor inf M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))) (taylor -inf M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3)))))) (taylor -inf M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3)))))) (taylor -inf M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3)))))) (taylor -inf M) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) l)) l) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) l)) l) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) l)) l) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (patch (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (sqrt -1)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) (patch (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf h) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf d) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor 0 l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor inf l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* h l) d)) (taylor -inf l) (#s(alt (*.f64 (/.f64 h d) (neg.f64 l)) (patch (*.f64 (/.f64 h d) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) (patch (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (*.f64 h (*.f64 M M)) (patch (*.f64 h (*.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d (pow h 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (patch (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (patch (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* (pow d 3) h))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) #<representation binary64>) () ())) ())
Calls

285 calls:

TimeVariablePointExpression
54.0ms
h
@-inf
(* h (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))))
38.0ms
l
@inf
(* h (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))))
2.0ms
h
@0
(* h (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))))
2.0ms
D
@0
(* h (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))))
2.0ms
d
@0
(* h (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))))

simplify372.0ms (1.6%)

Memory
-4.7MiB live, 626.6MiB allocated
Algorithm
egg-herbie
Rules
7 748×lower-*.f64
7 748×lower-*.f32
3 960×lower-fma.f64
3 960×lower-fma.f32
2 728×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
029316824
184616361
2295216250
3637216184
0815015848
Stop Event
iter limit
node limit
Counts
1 140 → 1 140
Calls
Call 1
Inputs
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
(* 1/4 (/ (* D M) d))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* h l)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1 d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (sqrt d) (sqrt -1))
(* (sqrt d) (sqrt -1))
(* (sqrt d) (sqrt -1))
(* (sqrt d) (sqrt -1))
(* (sqrt d) (sqrt -1))
(* (sqrt d) (sqrt -1))
(* (sqrt d) (sqrt -1))
(* (sqrt d) (sqrt -1))
(* -1 (* (sqrt d) (sqrt -1)))
(* -1 (* (sqrt d) (sqrt -1)))
(* -1 (* (sqrt d) (sqrt -1)))
(* -1 (* (sqrt d) (sqrt -1)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(/ d l)
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(sqrt (/ d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(sqrt (/ d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(sqrt (/ d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(sqrt (/ d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(sqrt (/ d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(/ (+ (sqrt (/ (pow d 5) (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ d h))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ d h))))) (pow d 2))
(sqrt (/ d (pow h 3)))
(* d (+ (sqrt (/ 1 (* d (pow h 3)))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 5) h)))))))
(* d (+ (sqrt (/ 1 (* d (pow h 3)))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 5) h)))))))
(* d (+ (sqrt (/ 1 (* d (pow h 3)))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 5) h)))))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 5) h))))) (* (sqrt (/ 1 (* d (pow h 3)))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 5) h))))) (* (sqrt (/ 1 (* d (pow h 3)))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 5) h))))) (* (sqrt (/ 1 (* d (pow h 3)))) (pow (sqrt -1) 2)))))
(sqrt (/ d (pow h 3)))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) (pow h 2))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) (pow h 2))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) (pow h 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))
(+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))
(sqrt (/ d (pow h 3)))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(sqrt (/ d (pow h 3)))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) l)) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) l)) l)
(sqrt (/ d (pow h 3)))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(sqrt (/ d (pow h 3)))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* -1 (/ (* h l) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(* (pow M 2) h)
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(sqrt (/ d (pow h 3)))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt (/ 1 (* (pow d 3) h)))
(* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))
Outputs
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/2 (/ (* D M) (* d l)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
(* 1/4 (/ (* D M) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D (*.f64 D h))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D (*.f64 D h))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D (*.f64 D h))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D (*.f64 D h))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D (*.f64 D h))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 M M) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D (*.f64 D h))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1 d)
(neg.f64 d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (sqrt d) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 d))
(* (sqrt d) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 d))
(* (sqrt d) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 d))
(* (sqrt d) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 d))
(* (sqrt d) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 d))
(* (sqrt d) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 d))
(* (sqrt d) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 d))
(* (sqrt d) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 d))
(* -1 (* (sqrt d) (sqrt -1)))
(*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt d) (sqrt -1)))
(*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt d) (sqrt -1)))
(*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt d) (sqrt -1)))
(*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(/ d l)
(/.f64 d l)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 d (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (*.f64 d (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 D (*.f64 D (*.f64 M M))) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (neg.f64 (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 h (fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 h (fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 h (fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (neg.f64 (*.f64 M M)) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))))) (/.f64 #s(literal -1/8 binary64) l))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 (fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 (fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))))
(*.f64 (fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (neg.f64 h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))))) l)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) h)
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h)
(/.f64 (fma.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 h (fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 h (fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(*.f64 h (fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 (neg.f64 (*.f64 M M)) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))))) (/.f64 #s(literal -1/8 binary64) l))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))))
(*.f64 h (-.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))))
(*.f64 h (-.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))))
(*.f64 h (-.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 h d)) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (*.f64 d d))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(*.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (*.f64 D D)) (*.f64 M M)) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(*.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d))) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(*.f64 (*.f64 M M) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))))) l)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)
(/ (+ (sqrt (/ (pow d 5) (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) (*.f64 h (*.f64 h h))))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) (*.f64 h (*.f64 h h))))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) (*.f64 h (*.f64 h h))))) (*.f64 d d))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* d (+ (sqrt (/ 1 (* d (pow h 3)))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 5) h)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (pow.f64 d #s(literal 5 binary64))))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h d) (*.f64 h h))))))
(* d (+ (sqrt (/ 1 (* d (pow h 3)))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 5) h)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (pow.f64 d #s(literal 5 binary64))))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h d) (*.f64 h h))))))
(* d (+ (sqrt (/ 1 (* d (pow h 3)))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 5) h)))))))
(*.f64 d (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (pow.f64 d #s(literal 5 binary64))))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h d) (*.f64 h h))))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 5) h))))) (* (sqrt (/ 1 (* d (pow h 3)))) (pow (sqrt -1) 2)))))
(*.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h d) (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (pow.f64 d #s(literal 5 binary64))))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 5) h))))) (* (sqrt (/ 1 (* d (pow h 3)))) (pow (sqrt -1) 2)))))
(*.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h d) (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (pow.f64 d #s(literal 5 binary64))))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 5) h))))) (* (sqrt (/ 1 (* d (pow h 3)))) (pow (sqrt -1) 2)))))
(*.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h d) (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (pow.f64 d #s(literal 5 binary64))))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) (pow h 2))
(/.f64 (fma.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) (*.f64 h h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) (pow h 2))
(/.f64 (fma.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) (*.f64 h h))
(/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) (pow h 2))
(/.f64 (fma.f64 (*.f64 D (/.f64 (*.f64 D (*.f64 M M)) l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 d (*.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) (*.f64 h h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))))
(+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))
(-.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l))
(+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))
(-.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l))
(+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h))))))
(-.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow D 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ 1 (* (pow d 3) h))))) (* (/ 1 (pow M 2)) (sqrt (/ d (pow h 3))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))
(/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) h))))) (* (sqrt (/ d (pow h 3))) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))))) l)
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))
(fma.f64 D (*.f64 D (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D M)) d)
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 h l) d)) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 h l) d)) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 h l) d)) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 h l) d)) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* (sqrt (/ (* h l) d)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 h l) d)) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 h l) d)) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 h l) d)) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt (/ (* h l) d)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 h l) d)) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* -1 (/ (* h l) d))
(*.f64 h (/.f64 l (neg.f64 d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 d (*.f64 d l)))))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(* (pow M 2) h)
(*.f64 h (*.f64 M M))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(sqrt (/ d (pow h 3)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(* -1/8 (/ (* (pow D 2) (pow M 2)) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) l))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(* -1 (* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(sqrt (/ 1 (* (pow d 3) h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d)))))
(* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))
(* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))
(* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))
(* (sqrt (/ 1 (* (pow d 3) h))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))

rewrite337.0ms (1.4%)

Memory
-7.3MiB live, 587.1MiB allocated
Rules
4 738×lower-*.f32
4 688×lower-*.f64
3 284×lower-/.f32
3 252×lower-/.f64
2 672×lower-pow.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
085483
0140445
1477416
23562395
08501390
Stop Event
iter limit
node limit
iter limit
Counts
29 → 1 011
Calls
Call 1
Inputs
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.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 d (sqrt.f64 (*.f64 h l))))
(/.f64 d (sqrt.f64 (*.f64 h l)))
(sqrt.f64 (*.f64 h l))
(*.f64 h l)
(*.f64 #s(literal 1 binary64) (neg.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(sqrt.f64 (/.f64 d h))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))
(*.f64 (/.f64 h d) (neg.f64 l))
(/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))
(*.f64 h (*.f64 M M))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h))))
Outputs
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (neg.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) h)) (/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) (/.f64 #s(literal -1 binary64) h)))
(neg.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) (/.f64 #s(literal -1 binary64) h)))
(neg.f64 (/.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))) #s(literal 1 binary64)))
(/.f64 h (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h) #s(literal 1 binary64))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) h) #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 d h) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (*.f64 (/.f64 d h) #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) h)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) h) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) h) (*.f64 d #s(literal -2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) (/.f64 #s(literal 1 binary64) h)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 d h) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) h))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M D) (*.f64 (/.f64 d h) #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 d h) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h))
(*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)))
(*.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) h)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 (/.f64 d h) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) h))
(*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) h)) (/.f64 #s(literal 1/2 binary64) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 #s(literal 1 binary64) h)) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 #s(literal 1/2 binary64) d)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) d)) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(exp.f64 (*.f64 (log.f64 (*.f64 l (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 l)) (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 l (*.f64 d #s(literal -2 binary64)))) (/.f64 (*.f64 M D) (*.f64 l (*.f64 d #s(literal -2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l))) (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(neg.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l))
(/.f64 #s(literal 1 binary64) (*.f64 l (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) #s(literal 1 binary64)))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l)
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (neg.f64 (neg.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 l (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 M D)) (*.f64 l (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 M D)) (neg.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d l))
(/.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))
(/.f64 (/.f64 (*.f64 M D) d) (*.f64 l #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal 2 binary64)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 M D)) #s(literal 1 binary64)) (*.f64 (*.f64 d #s(literal -2 binary64)) l))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (*.f64 d l))
(/.f64 (*.f64 (/.f64 (*.f64 M D) d) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) l))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)) l)
(/.f64 (*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) l)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (*.f64 M D)) (/.f64 #s(literal 1 binary64) l)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) l)) d)
(/.f64 (*.f64 (/.f64 (*.f64 M D) d) (/.f64 #s(literal 1 binary64) l)) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 M D) l) (*.f64 d #s(literal 2 binary64)))
(/.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) #s(literal -1 binary64)) l)
(pow.f64 (*.f64 l (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) l) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 M D)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 l (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 M (*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) l)))
(*.f64 M (/.f64 D (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(*.f64 M (/.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) l))
(*.f64 D (/.f64 M (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(*.f64 (*.f64 M D) (/.f64 (/.f64 #s(literal 1/2 binary64) d) l))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (*.f64 (/.f64 D d) (/.f64 #s(literal 1 binary64) l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 (/.f64 D d) l))
(*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) l)))
(*.f64 (/.f64 M d) (/.f64 (*.f64 D #s(literal 1/2 binary64)) l))
(*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 M l) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (/.f64 D l) (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 l (*.f64 M D)) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (/.f64 l (neg.f64 (*.f64 M D))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (pow.f64 (/.f64 l (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (pow.f64 (/.f64 l (/.f64 (*.f64 M D) d)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 d #s(literal -2 binary64))) (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64)))))
(neg.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))))
(/.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 #s(literal 1 binary64) (*.f64 d #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) d)
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 2 binary64)) d)
(pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)))
(*.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/4 binary64))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) d) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) #s(literal 2 binary64)) (/.f64 D d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) M)) (/.f64 D d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 M d)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 d (*.f64 #s(literal 1/2 binary64) M)) #s(literal -1 binary64)) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) M)) #s(literal -1 binary64)) (/.f64 D d))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
(+.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) #s(literal 3 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64))))) (*.f64 h h)) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64))))) (*.f64 h h)) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64)))) (/.f64 h l))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h) (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) (neg.f64 (/.f64 h l)) #s(literal 1 binary64))
(fma.f64 (/.f64 h l) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) #s(literal 1 binary64))
(fma.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (/.f64 h l) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64)))) (/.f64 h l)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 h l)) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64)))) #s(literal -1/2 binary64)) h) (/.f64 #s(literal 1 binary64) l) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64))))) (*.f64 h h)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64))))) (*.f64 h h)) (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64))))) (*.f64 h h))) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64))))) (*.f64 h h))) (-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64))))) (*.f64 h h)))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) #s(literal 3 binary64))) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)) #s(literal 1 binary64)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64))))) (*.f64 h h)))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64))))) (*.f64 h h))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h #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 d (sqrt.f64 (*.f64 h l))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/2 binary64)))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)))))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d)) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 (neg.f64 d)) #s(literal 1/2 binary64)) (*.f64 (log.f64 (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 h l)))) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
(neg.f64 (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))))
(neg.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
(neg.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 h l))))
(/.f64 d (sqrt.f64 (*.f64 h l)))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 l) (neg.f64 h))))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d) #s(literal 1 binary64)))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 h))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 l d) h)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 h l)))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l))
(/.f64 (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 l (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d h))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d) #s(literal -1 binary64))
(pow.f64 (/.f64 (neg.f64 (/.f64 (*.f64 h l) d)) (neg.f64 d)) #s(literal -1/2 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 h l)) (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 1/2 binary64))
(*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 h l)))))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 h l) d)))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal -1 binary64) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(*.f64 (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 d))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) d)
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 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 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 (/.f64 (*.f64 h l) d)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 d (/.f64 h d)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (/.f64 d (/.f64 h d))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (/.f64 (sqrt.f64 l) d) #s(literal -1 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 (*.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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (neg.f64 d) (/.f64 h d)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 d) (/.f64 h d)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 h d)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 d (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 d) (*.f64 h (neg.f64 l))) #s(literal 1/2 binary64)) (sqrt.f64 d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (/.f64 h d))) (sqrt.f64 (/.f64 d (neg.f64 l))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 d) (*.f64 h (neg.f64 l)))) (sqrt.f64 d))
(exp.f64 (*.f64 (log.f64 (*.f64 h l)) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 h l))
(pow.f64 (*.f64 h l) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 h l) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 h l) (*.f64 h l)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 h l))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 h) (sqrt.f64 l))
(*.f64 (sqrt.f64 l) (sqrt.f64 h))
(*.f64 (pow.f64 (*.f64 h l) #s(literal 1/4 binary64)) (pow.f64 (*.f64 h l) #s(literal 1/4 binary64)))
(*.f64 h l)
(*.f64 l h)
(+.f64 #s(literal 0 binary64) (neg.f64 d))
(-.f64 #s(literal 0 binary64) d)
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 d d (*.f64 #s(literal 0 binary64) d)))) (/.f64 (*.f64 d (*.f64 d d)) (+.f64 #s(literal 0 binary64) (fma.f64 d d (*.f64 #s(literal 0 binary64) d)))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) d)) (/.f64 (*.f64 d d) (+.f64 #s(literal 0 binary64) d)))
(neg.f64 d)
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d (*.f64 d d))) (+.f64 #s(literal 0 binary64) (fma.f64 d d (*.f64 #s(literal 0 binary64) d))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d)) (+.f64 #s(literal 0 binary64) d))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 d) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 d d) (*.f64 #s(literal 0 binary64) (neg.f64 d)))))
(*.f64 d #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (neg.f64 d))
(*.f64 (neg.f64 d) #s(literal 1 binary64))
(*.f64 #s(literal -1 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 d (sqrt.f64 (*.f64 h l))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/2 binary64)))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)))))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d)) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 (neg.f64 d)) #s(literal 1/2 binary64)) (*.f64 (log.f64 (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 h l)))) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
(neg.f64 (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))))
(neg.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
(neg.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 h l))))
(/.f64 d (sqrt.f64 (*.f64 h l)))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 l) (neg.f64 h))))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d) #s(literal 1 binary64)))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 h))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 l d) h)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 h l)))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l))
(/.f64 (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 l (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d h))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d) #s(literal -1 binary64))
(pow.f64 (/.f64 (neg.f64 (/.f64 (*.f64 h l) d)) (neg.f64 d)) #s(literal -1/2 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 h l)) (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 1/2 binary64))
(*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 h l)))))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 h l) d)))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal -1 binary64) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(*.f64 (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 d))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) d)
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 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 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 (/.f64 (*.f64 h l) d)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 d (/.f64 h d)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (/.f64 d (/.f64 h d))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (/.f64 (sqrt.f64 l) d) #s(literal -1 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 (*.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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (neg.f64 d) (/.f64 h d)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 d) (/.f64 h d)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 h d)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 d (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 d) (*.f64 h (neg.f64 l))) #s(literal 1/2 binary64)) (sqrt.f64 d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (/.f64 h d))) (sqrt.f64 (/.f64 d (neg.f64 l))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 d) (*.f64 h (neg.f64 l)))) (sqrt.f64 d))
(exp.f64 (*.f64 (log.f64 (neg.f64 d)) #s(literal 1/2 binary64)))
(sqrt.f64 (neg.f64 d))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 d (*.f64 d d)))) (sqrt.f64 (+.f64 #s(literal 0 binary64) (fma.f64 d d (*.f64 #s(literal 0 binary64) d)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 d d))) (sqrt.f64 (+.f64 #s(literal 0 binary64) d)))
(pow.f64 (neg.f64 d) #s(literal 1/2 binary64))
(pow.f64 (*.f64 d d) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (neg.f64 d))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (neg.f64 d)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 d) (sqrt.f64 #s(literal -1 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 d))
(*.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(+.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 h l)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 h l) d)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))))))
(fma.f64 #s(literal -1 binary64) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))) (sqrt.f64 (neg.f64 d)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 d))) #s(literal -1 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) d (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 (/.f64 (*.f64 h l) d)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 d (/.f64 h d)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (/.f64 d (/.f64 h d))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (/.f64 (sqrt.f64 l) d) #s(literal -1 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.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 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (neg.f64 d) (/.f64 h d)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 (neg.f64 d) (/.f64 h d)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 h d)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 d (neg.f64 l)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 (neg.f64 d) (*.f64 h (neg.f64 l))) #s(literal 1/2 binary64)) (sqrt.f64 d) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (/.f64 h d))) (sqrt.f64 (/.f64 d (neg.f64 l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (neg.f64 d) (*.f64 h (neg.f64 l)))) (sqrt.f64 d) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (+.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))
(/.f64 (+.f64 (pow.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #s(literal 3 binary64))) (fma.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))))))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/2 binary64)))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)))))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h)) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d)) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 (neg.f64 d)) #s(literal 1/2 binary64)) (*.f64 (log.f64 (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 h l)))) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))) (/.f64 (sqrt.f64 (neg.f64 d)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))
(neg.f64 (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))))
(neg.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
(neg.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 h l))))
(/.f64 d (sqrt.f64 (*.f64 h l)))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 l) (neg.f64 h))))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d) #s(literal 1 binary64)))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 h l))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 h))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 l d) h)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 h l)))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d l))) (sqrt.f64 h))
(/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l))
(/.f64 (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 l (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 h (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d h))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d) #s(literal -1 binary64))
(pow.f64 (/.f64 (neg.f64 (/.f64 (*.f64 h l) d)) (neg.f64 d)) #s(literal -1/2 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 h l)) (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 1/2 binary64))
(*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 h l)))))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 h l) d)))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal -1 binary64) (/.f64 d (neg.f64 (sqrt.f64 (*.f64 h l)))))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d))))))
(*.f64 (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (/.f64 (/.f64 d h) (neg.f64 l))) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 d))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) d)
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 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 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 (/.f64 (*.f64 h l) d)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 d (/.f64 h d)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (/.f64 d (/.f64 h d))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (/.f64 (sqrt.f64 l) d) #s(literal -1 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 (*.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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (neg.f64 d) (/.f64 h d)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 d) (/.f64 h d)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 h d)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 d (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (neg.f64 d) (*.f64 h (neg.f64 l))) #s(literal 1/2 binary64)) (sqrt.f64 d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 d) (/.f64 h d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (/.f64 h d))) (sqrt.f64 (/.f64 d (neg.f64 l))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 d) (*.f64 h (neg.f64 l)))) (sqrt.f64 d))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d l))))
(exp.f64 (*.f64 (log.f64 (/.f64 l d)) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 l d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 l d)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 l d)) #s(literal 1/2 binary64))))
(sqrt.f64 (/.f64 d l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 (sqrt.f64 (/.f64 (neg.f64 d) #s(literal -1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 l))))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 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 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 (neg.f64 d) l) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 l))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (neg.f64 d) l)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 l (neg.f64 d)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 d)))
(*.f64 (pow.f64 (/.f64 (neg.f64 d) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1/2 binary64)) (pow.f64 (/.f64 l #s(literal 1 binary64)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (/.f64 d l) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 d l) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 d) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(exp.f64 (log.f64 (/.f64 d l)))
(exp.f64 (*.f64 (log.f64 (/.f64 l d)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 l)) (/.f64 d (neg.f64 l)))
(neg.f64 (/.f64 d (neg.f64 l)))
(neg.f64 (/.f64 (neg.f64 d) l))
(/.f64 d l)
(/.f64 #s(literal 1 binary64) (/.f64 l d))
(/.f64 #s(literal 1 binary64) (exp.f64 (log.f64 (/.f64 l d))))
(/.f64 (neg.f64 d) (neg.f64 l))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l d)))
(/.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) d))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 l)))
(/.f64 (/.f64 (neg.f64 d) #s(literal -1 binary64)) l)
(/.f64 (exp.f64 (log.f64 (neg.f64 d))) (exp.f64 (log.f64 (neg.f64 l))))
(/.f64 (exp.f64 (log.f64 d)) (exp.f64 (log.f64 l)))
(pow.f64 (/.f64 d l) #s(literal 1 binary64))
(pow.f64 (/.f64 l d) #s(literal -1 binary64))
(*.f64 d (/.f64 #s(literal 1 binary64) l))
(*.f64 #s(literal 1 binary64) (/.f64 d l))
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 #s(literal -1 binary64) (/.f64 d (neg.f64 l)))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 d) l))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 l (neg.f64 d)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) l) d)
(*.f64 (/.f64 #s(literal 1 binary64) l) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) (neg.f64 d))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal -1 binary64)))
(*.f64 (/.f64 (neg.f64 d) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 d)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (exp.f64 (log.f64 d)) (exp.f64 (neg.f64 (log.f64 l))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (/.f64 l d)))) (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(neg.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(neg.f64 (/.f64 (neg.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) (sqrt.f64 (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) #s(literal 1 binary64)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))))
(/.f64 (neg.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (neg.f64 (neg.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))
(pow.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (/.f64 l d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))
(*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 #s(literal 1 binary64) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) #s(literal -1 binary64)))
(*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (sqrt.f64 (/.f64 d l)))
(*.f64 (neg.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(*.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (sqrt.f64 l)) (sqrt.f64 d))
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))
(+.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(+.f64 (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))
(-.f64 (/.f64 (*.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))) (-.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (/.f64 (*.f64 (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (-.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))))
(fma.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))
(fma.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) h) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) h) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(fma.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) h (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))
(fma.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) h (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(fma.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (*.f64 d (sqrt.f64 (*.f64 d h)))) (*.f64 (/.f64 (*.f64 M M) l) h) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(fma.f64 (*.f64 h (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(fma.f64 (*.f64 h (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))) (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(fma.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (*.f64 d (sqrt.f64 (*.f64 d h))))) (/.f64 (*.f64 M M) l) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(/.f64 (+.f64 (pow.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) #s(literal 3 binary64)) (*.f64 (*.f64 h (*.f64 h h)) (/.f64 (*.f64 d (sqrt.f64 d)) (*.f64 (*.f64 h (*.f64 h h)) (*.f64 h (sqrt.f64 h)))))) (fma.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (-.f64 (*.f64 (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (*.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))) (*.f64 (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (-.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(/.f64 (*.f64 h (fma.f64 (/.f64 d (*.f64 h (*.f64 h h))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) #s(literal 3 binary64)))) (-.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))) (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))
(/.f64 (*.f64 h (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (/.f64 d (*.f64 h (*.f64 h h))))) (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(/.f64 (*.f64 (fma.f64 (/.f64 d (*.f64 h (*.f64 h h))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) #s(literal 3 binary64))) h) (-.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))) (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (/.f64 d (*.f64 h (*.f64 h h)))) h) (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(/.f64 (fma.f64 (*.f64 h (*.f64 h h)) (/.f64 (*.f64 d (sqrt.f64 d)) (*.f64 (*.f64 h (*.f64 h h)) (*.f64 h (sqrt.f64 h)))) (pow.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) #s(literal 3 binary64))) (fma.f64 (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (-.f64 (*.f64 (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))) (*.f64 (*.f64 h (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (*.f64 h (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))))
(*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))) h)
(+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(+.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(-.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))) (/.f64 (/.f64 d (*.f64 h (*.f64 h h))) (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(-.f64 (/.f64 (/.f64 d (*.f64 h (*.f64 h h))) (-.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (-.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 h (*.f64 h h)))) #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 h (*.f64 h h))))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 M M) l)) (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) l) (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (/.f64 (*.f64 M M) l) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (*.f64 d (sqrt.f64 (*.f64 d h)))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (*.f64 h (sqrt.f64 h))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (*.f64 d (sqrt.f64 (*.f64 d h)))) (/.f64 (*.f64 M M) l) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (sqrt.f64 h))) (sqrt.f64 d) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 (*.f64 h (*.f64 h h)))) #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 (*.f64 h (*.f64 h h))))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (pow.f64 (/.f64 d (*.f64 h (*.f64 h h))) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d (*.f64 h (*.f64 h h))) #s(literal 1/4 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) #s(literal -1/8 binary64)) (*.f64 (*.f64 D D) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) (/.f64 (*.f64 M M) l)) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (*.f64 d (sqrt.f64 (*.f64 d h)))) M) (/.f64 M l) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (*.f64 d (sqrt.f64 (*.f64 d h)))) (*.f64 M M)) (/.f64 #s(literal 1 binary64) l) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(fma.f64 (sqrt.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (sqrt.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))) (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))) (fma.f64 (/.f64 d (*.f64 h (*.f64 h h))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (/.f64 d (*.f64 h (*.f64 h h))))))
(/.f64 (fma.f64 (/.f64 d (*.f64 h (*.f64 h h))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) #s(literal 3 binary64))) (-.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))) (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))
(/.f64 (fma.f64 (/.f64 d (*.f64 h (*.f64 h h))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) #s(literal 3 binary64))) (+.f64 (/.f64 d (*.f64 h (*.f64 h h))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (*.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (/.f64 d (*.f64 h (*.f64 h h)))) (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(/.f64 (neg.f64 (fma.f64 (/.f64 d (*.f64 h (*.f64 h h))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) #s(literal 3 binary64)))) (neg.f64 (-.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))) (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (/.f64 d (*.f64 h (*.f64 h h))))) (neg.f64 (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(/.f64 (-.f64 (/.f64 d (*.f64 h (*.f64 h h))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))))) (-.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))
(pow.f64 (/.f64 (-.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))) (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))) (fma.f64 (/.f64 d (*.f64 h (*.f64 h h))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (/.f64 d (*.f64 h (*.f64 h h))))) #s(literal -1 binary64))
(*.f64 (fma.f64 (/.f64 d (*.f64 h (*.f64 h h))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))) (/.f64 d (*.f64 h (*.f64 h h)))) (*.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))
(*.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)))) (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d h))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64))))
(sqrt.f64 (/.f64 d h))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 h d))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 h))))
(pow.f64 (/.f64 d h) #s(literal 1/2 binary64))
(pow.f64 (/.f64 h d) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 d h) (/.f64 d h)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 h)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 h))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 d))
(*.f64 (pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 d)))
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 d)))
(exp.f64 (log.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 d)) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 d #s(literal -2 binary64))) (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(neg.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal -2 binary64))))
(/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D))))
(/.f64 (neg.f64 (*.f64 M D)) (*.f64 d #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 M D) #s(literal -1/2 binary64)) (neg.f64 d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) d)
(/.f64 (/.f64 (*.f64 M D) d) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64)) (*.f64 d #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 M D))) (neg.f64 (*.f64 d #s(literal -2 binary64))))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) d)) #s(literal -2 binary64))
(/.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 d #s(literal 2 binary64)))))
(/.f64 (exp.f64 (log.f64 (neg.f64 (*.f64 M D)))) (exp.f64 (log.f64 (*.f64 d #s(literal -2 binary64)))))
(/.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))) (exp.f64 (log.f64 d)))
(/.f64 (exp.f64 (log.f64 (/.f64 (*.f64 M D) d))) (exp.f64 (log.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 M D)) (*.f64 d (*.f64 d #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 M D)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 d (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) d)) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M D) d))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (*.f64 M D) d) #s(literal 1 binary64)))
(*.f64 M (/.f64 D (*.f64 d #s(literal 2 binary64))))
(*.f64 D (/.f64 M (*.f64 d #s(literal 2 binary64))))
(*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 D (pow.f64 (/.f64 M (*.f64 d #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 D (pow.f64 (*.f64 M (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D d))
(*.f64 (/.f64 D d) (*.f64 #s(literal 1/2 binary64) M))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 M d) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 M d))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1/2 binary64) (*.f64 M D)))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(*.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))) M)
(*.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))))
(*.f64 (pow.f64 (/.f64 (*.f64 M D) d) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (neg.f64 (*.f64 M D)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d #s(literal -2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (/.f64 D (*.f64 d #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 d #s(literal 2 binary64))))))
(*.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) M))) (exp.f64 (log.f64 (/.f64 D d))))
(*.f64 (exp.f64 (log.f64 (/.f64 M d))) (exp.f64 (log.f64 (*.f64 D #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/2 binary64)))
(sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d (*.f64 h (neg.f64 l)))))
(/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (/.f64 d h)))
(/.f64 (sqrt.f64 (*.f64 h (neg.f64 l))) (sqrt.f64 d))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 l) (neg.f64 h))) (sqrt.f64 (neg.f64 d)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 h (neg.f64 l)))) (sqrt.f64 (neg.f64 d)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 l) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (/.f64 d h)))
(pow.f64 (neg.f64 (/.f64 (*.f64 h l) d)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (neg.f64 (/.f64 (*.f64 h l) d)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (neg.f64 (/.f64 (*.f64 h l) d)) (neg.f64 (/.f64 (*.f64 h l) d))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (neg.f64 (/.f64 (*.f64 h l) d)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 h) (pow.f64 (/.f64 (neg.f64 l) d) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 h) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 h) (sqrt.f64 (/.f64 (neg.f64 l) d)))
(*.f64 (sqrt.f64 h) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (neg.f64 l))))
(*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l)))
(*.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (/.f64 h d)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 h l) d) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 h l) d)))
(*.f64 (sqrt.f64 (*.f64 h (neg.f64 l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(*.f64 (pow.f64 (neg.f64 (/.f64 (*.f64 h l) d)) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 (/.f64 (*.f64 h l) d)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (neg.f64 (/.f64 h d)) #s(literal 1/2 binary64)) (sqrt.f64 l))
(*.f64 (pow.f64 (*.f64 (/.f64 h d) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 l))
(*.f64 (sqrt.f64 (neg.f64 (/.f64 h d))) (sqrt.f64 l))
(*.f64 (sqrt.f64 (*.f64 (/.f64 h d) #s(literal -1 binary64))) (sqrt.f64 l))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 h l) d))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 d h)) (/.f64 l (/.f64 d h)))
(neg.f64 (/.f64 (*.f64 h l) d))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 h (neg.f64 l))))
(/.f64 (neg.f64 l) (/.f64 d h))
(/.f64 (*.f64 h (neg.f64 l)) d)
(/.f64 (*.f64 (neg.f64 l) (neg.f64 h)) (neg.f64 d))
(/.f64 (*.f64 (neg.f64 h) (neg.f64 l)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 h (neg.f64 l))) (neg.f64 d))
(/.f64 (*.f64 (neg.f64 l) #s(literal 1 binary64)) (/.f64 d h))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 l)) (/.f64 d h))
(pow.f64 (/.f64 d (*.f64 h (neg.f64 l))) #s(literal -1 binary64))
(*.f64 h (/.f64 (neg.f64 l) d))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) d) (neg.f64 l)))
(*.f64 (/.f64 h d) (neg.f64 l))
(*.f64 (neg.f64 l) (/.f64 h d))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h l) d))
(*.f64 (*.f64 h (neg.f64 l)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (neg.f64 (/.f64 h d)) l)
(*.f64 (*.f64 (/.f64 h d) #s(literal -1 binary64)) l)
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 d (*.f64 d l)))) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (neg.f64 (*.f64 d (*.f64 d l)))))
(neg.f64 (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (neg.f64 (*.f64 d (*.f64 d l)))))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (neg.f64 D)) (*.f64 d (*.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d l) (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d))))
(/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)))))
(/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (neg.f64 D)) (neg.f64 (*.f64 d (*.f64 d l))))
(/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) (*.f64 d l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (neg.f64 D))) (neg.f64 (neg.f64 (*.f64 d (*.f64 d l)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d))) (neg.f64 (*.f64 d l)))
(/.f64 (*.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) #s(literal 1 binary64)) (*.f64 d (*.f64 d l)))
(/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l))
(/.f64 (*.f64 D (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d l))) d)
(/.f64 (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d l)) d)
(/.f64 (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d d)) l)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) d) l)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) l) d)
(pow.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 d (*.f64 d l)) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d l) (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d))) #s(literal -1 binary64))
(*.f64 D (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 D (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l)))))
(*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 D D) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l)))))
(*.f64 (*.f64 D D) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 d (*.f64 d l))))
(*.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (neg.f64 D)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 d (*.f64 d l)))))
(*.f64 (/.f64 D d) (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d l)) (/.f64 D d))
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (/.f64 (*.f64 d l) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d l))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) (/.f64 #s(literal 1 binary64) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D)
(*.f64 (/.f64 D (*.f64 d l)) (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) d))
(*.f64 (/.f64 D (*.f64 d d)) (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) l))
(*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) d) (/.f64 D (*.f64 d l)))
(*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l))
(*.f64 (/.f64 (*.f64 D D) d) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 d l)))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d l)) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) d))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (/.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) l))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d l)) (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (pow.f64 (/.f64 l (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d l) D) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d l) D) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 d (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d l) (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d l) (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 d (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) D) #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) #s(literal -1 binary64)) (pow.f64 (/.f64 l D) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 D D)) #s(literal -1 binary64)) (pow.f64 (/.f64 l (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64)))) #s(literal -1 binary64)))
(*.f64 M (*.f64 M h))
(*.f64 h (*.f64 M M))
(*.f64 (*.f64 M M) h)
(*.f64 (*.f64 M h) M)
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(fabs.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))
(/.f64 #s(literal 1 binary64) (*.f64 h (sqrt.f64 (/.f64 h d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 (*.f64 h (*.f64 h h)) d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 h h) (/.f64 d h))))
(/.f64 (sqrt.f64 (neg.f64 d)) (*.f64 h (sqrt.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 (/.f64 d h)) h)
(/.f64 (sqrt.f64 d) (*.f64 h (sqrt.f64 h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h (*.f64 h h)) d))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (*.f64 h (sqrt.f64 h))))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 (*.f64 h (*.f64 h h))))))
(/.f64 (sqrt.f64 (neg.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 (*.f64 h h))))
(/.f64 (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 d (*.f64 h (*.f64 h h))) d))) (sqrt.f64 (*.f64 h (sqrt.f64 h))))
(/.f64 (sqrt.f64 (sqrt.f64 (*.f64 d (/.f64 d (*.f64 h (*.f64 h h)))))) (sqrt.f64 (*.f64 h (sqrt.f64 h))))
(/.f64 (sqrt.f64 (/.f64 d (*.f64 h h))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (/.f64 (/.f64 d h) h)) (sqrt.f64 h))
(pow.f64 (/.f64 d (*.f64 h (*.f64 h h))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (*.f64 h (*.f64 h h)) d) #s(literal -1/2 binary64))
(pow.f64 (*.f64 (/.f64 d (*.f64 h (*.f64 h h))) (/.f64 d (*.f64 h (*.f64 h h)))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 h (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 d (*.f64 h (*.f64 h h))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 h (*.f64 h h)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 h (*.f64 h h))))))
(*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h))))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (*.f64 h (sqrt.f64 h))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (sqrt.f64 h))) (sqrt.f64 d))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 (*.f64 h (*.f64 h h)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 (*.f64 h (*.f64 h h))))))
(*.f64 (pow.f64 (/.f64 d (*.f64 h (*.f64 h h))) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d (*.f64 h (*.f64 h h))) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))) (sqrt.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))))
(/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 l (*.f64 M M)))
(/.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) l)
(/.f64 (neg.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (neg.f64 l))
(/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) #s(literal 1 binary64)) (/.f64 l (*.f64 M M)))
(/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (neg.f64 (*.f64 M M))) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (/.f64 l (*.f64 M M)))
(/.f64 (*.f64 (neg.f64 (*.f64 M M)) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (neg.f64 l))
(pow.f64 (/.f64 l (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) #s(literal -1 binary64))
(*.f64 M (*.f64 (/.f64 M l) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))))
(*.f64 (*.f64 M M) (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))))
(*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 M M) l)))
(*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 M M) l)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l))
(*.f64 (/.f64 (*.f64 M M) l) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))
(*.f64 (*.f64 D #s(literal -1/8 binary64)) (*.f64 D (/.f64 (*.f64 M M) l)))
(*.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 M M) l)) #s(literal -1/8 binary64))
(*.f64 (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) M) (/.f64 M l))
(*.f64 (*.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64)) (*.f64 D D))
(*.f64 (*.f64 (/.f64 (*.f64 M M) l) (*.f64 D #s(literal -1/8 binary64))) D)
(exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 d (*.f64 h (*.f64 d d))))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 d (*.f64 h (*.f64 d d)))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 d (sqrt.f64 (*.f64 d h)))) #s(literal -1 binary64)))
(fabs.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))))
(/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (neg.f64 (*.f64 d (*.f64 h (*.f64 d d)))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 h (*.f64 d d)) (/.f64 #s(literal 1 binary64) d))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 d (sqrt.f64 (*.f64 d h)))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) (*.f64 d (sqrt.f64 h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (*.f64 d (*.f64 h (*.f64 d d))))))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d d)))) (sqrt.f64 d))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d d)))) (sqrt.f64 h))
(/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) d))) (sqrt.f64 (neg.f64 (*.f64 h (*.f64 d d)))))
(/.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) d) d)) (sqrt.f64 (*.f64 d h)))
(/.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) d) h)) d)
(pow.f64 (*.f64 d (*.f64 h (*.f64 d d))) #s(literal -1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (*.f64 d (*.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d)))) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 h (*.f64 d d))))) #s(literal 1/4 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) (pow.f64 (*.f64 h (*.f64 d d)) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) (pow.f64 (/.f64 (*.f64 h (*.f64 d d)) #s(literal 1 binary64)) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d d))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) (pow.f64 (*.f64 d (sqrt.f64 h)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d d)))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 d (*.f64 h (*.f64 d d))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 d (*.f64 h (*.f64 d d)))))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (pow.f64 (*.f64 d (*.f64 d d)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (*.f64 d (*.f64 h (*.f64 d d))) #s(literal -1/4 binary64)) (pow.f64 (*.f64 d (*.f64 h (*.f64 d d))) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (*.f64 h (*.f64 d d)) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(*.f64 (pow.f64 (*.f64 h (*.f64 d d)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 d #s(literal 1 binary64)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (*.f64 d (*.f64 d d)) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (pow.f64 (*.f64 d d) #s(literal -1/2 binary64)) (pow.f64 (*.f64 d h) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (*.f64 d h) #s(literal -1/2 binary64)) (pow.f64 (*.f64 d d) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d d))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d d))) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (pow.f64 (*.f64 d (sqrt.f64 h)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(*.f64 (pow.f64 (*.f64 d (sqrt.f64 d)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (sqrt.f64 (*.f64 d h))))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d d)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 d)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 d d)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))

eval332.0ms (1.4%)

Memory
44.6MiB live, 534.6MiB allocated
Compiler

Compiled 71 360 to 3 889 computations (94.6% saved)

prune515.0ms (2.2%)

Memory
-14.5MiB live, 996.6MiB allocated
Pruning

73 alts after pruning (71 fresh and 2 done)

PrunedKeptTotal
New2 296372 333
Fresh243458
Picked415
Done011
Total2 324732 397
Accuracy
94.6%
Counts
2 397 → 73
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.9%
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
44.9%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
28.0%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 d))))
52.6%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
54.5%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
24.3%
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
40.7%
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 l d)))
25.4%
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 M (*.f64 (/.f64 M l) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
19.2%
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
13.1%
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
22.8%
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
32.1%
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
14.7%
(*.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (sqrt.f64 l)) (sqrt.f64 d))
25.5%
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))
33.0%
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
65.7%
(*.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 h #s(literal 1/2 binary64)) l) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
53.1%
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) h) (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64))))))))
53.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
30.9%
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
39.8%
(*.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)) (*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))) #s(literal 1/4 binary64))) (/.f64 h l))))
30.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
61.6%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) l) d))))
58.0%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
53.7%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
52.9%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
48.7%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
2.1%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
41.6%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
36.6%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
41.6%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
67.6%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64)))
66.5%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64)))
71.3%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h)))))
71.9%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h))))
65.1%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))))))
56.0%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
20.9%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
14.3%
(*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))
13.9%
(*.f64 (neg.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d)))))
28.6%
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
28.6%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
17.7%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
1.9%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h)))
16.3%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
16.3%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
21.7%
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
25.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 d (sqrt.f64 l)) (sqrt.f64 h)))
25.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 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
41.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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
17.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 (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
17.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 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
23.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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l)))))
19.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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 h)))))
17.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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) d)))))
25.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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
26.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 d (sqrt.f64 (*.f64 h l))))
26.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d)))
33.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 h d)))))
26.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) d))
15.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 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
41.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 l)) (sqrt.f64 (/.f64 d h))))
28.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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
2.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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 l)))))
26.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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
26.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 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) h))))
26.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 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l))))
26.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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.f64 #s(literal 1 binary64) l))))))
26.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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
23.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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
25.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 d (exp.f64 (*.f64 (log.f64 (*.f64 h l)) #s(literal -1/2 binary64)))))
26.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
24.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d)) #s(literal -1 binary64))))
Compiler

Compiled 6 963 to 2 033 computations (70.8% saved)

regimes465.0ms (2%)

Memory
-4.3MiB live, 674.2MiB allocated
Counts
164 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) l) d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d l)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 #s(approx (pow (/ d h) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d h)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) 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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
#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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 d))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h)))))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))
(*.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (neg.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 M (*.f64 (/.f64 M l) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d l))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d 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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d 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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d 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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (/.f64 D (*.f64 d (*.f64 d l))) h) (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64))))))))
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 d (exp.f64 (*.f64 (log.f64 (*.f64 h l)) #s(literal -1/2 binary64)))))
(*.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (*.f64 D M))) d)))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M (/.f64 D d))) h))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.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 (/.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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) 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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/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)))) (exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 h l)) d)) #s(literal -1 binary64))))
(*.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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) 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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 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)) (*.f64 (*.f64 (*.f64 M (/.f64 D d)) (*.f64 M (/.f64 D d))) #s(literal 1/4 binary64))) (/.f64 h l))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/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)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/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)) (*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) (*.f64 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 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 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)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d 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 M D) #s(approx (* (* (/ 1 (* (* d d) 4)) (* M D)) (/ (* h 1/2) l)) (/.f64 (*.f64 h (*.f64 #s(literal 1/8 binary64) (*.f64 D M))) (*.f64 d (*.f64 d l)))))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) d) (/.f64 D (*.f64 d 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 M D) (*.f64 h (*.f64 (/.f64 #s(literal 1/2 binary64) l) (/.f64 (*.f64 M D) (*.f64 d (*.f64 d #s(literal 4 binary64)))))))))
(*.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 h #s(literal 1/2 binary64)) l) (*.f64 (*.f64 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64))) (*.f64 d d))))
(*.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 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 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 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 (*.f64 M D) (neg.f64 (*.f64 M D)))) (neg.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64))))))
(*.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 (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 M D) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)) (/.f64 (*.f64 h #s(literal 1/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 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (*.f64 M D)))))
(*.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 M (*.f64 D (*.f64 M D))) (*.f64 h #s(literal 1/2 binary64))) (*.f64 (*.f64 d d) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) 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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 h #s(literal 1/2 binary64)) l) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
(*.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 h #s(literal 1/2 binary64)) l) (*.f64 M D)) (/.f64 (*.f64 (*.f64 d d) #s(literal 4 binary64)) (*.f64 M D)))))
(*.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 M (*.f64 D (*.f64 M D))) #s(literal 1/4 binary64)) d) (/.f64 (*.f64 h #s(literal 1/2 binary64)) l)) d)))
(*.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 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))) (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)) #s(approx (pow (/ (* M D) (* 2 d)) 2) (*.f64 M (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D (/.f64 M (*.f64 d d)))) D)))) (/.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 M D) (*.f64 d #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 h l)))))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.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))))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.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 (*.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 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #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 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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)) (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 (pow.f64 (/.f64 d l) #s(literal 1/8 binary64)) #s(literal 4 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))) (pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 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 (pow.f64 (/.f64 d h) #s(literal 1/8 binary64)) #s(literal 4 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 (pow.f64 (/.f64 d h) #s(literal 1/4 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 h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (pow.f64 (/.f64 d l) #s(literal 3/8 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/8 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 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d 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 h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
Calls

7 calls:

88.0ms
(*.f64 M D)
82.0ms
D
76.0ms
M
47.0ms
h
46.0ms
l
Results
AccuracySegmentsBranch
82.7%2d
82.7%2h
82.7%2l
71.9%1M
71.9%1D
77.4%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))))
71.9%1(*.f64 M D)
Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes121.0ms (0.5%)

Memory
-13.6MiB live, 155.3MiB allocated
Counts
100 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) l) d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d l)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 #s(approx (pow (/ d h) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d h)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) 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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
#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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 d))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h)))))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))
(*.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (neg.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 M (*.f64 (/.f64 M l) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
Calls

3 calls:

50.0ms
d
34.0ms
h
30.0ms
l
Results
AccuracySegmentsBranch
82.6%2d
82.6%2l
82.6%2h
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes94.0ms (0.4%)

Memory
30.0MiB live, 184.0MiB allocated
Counts
97 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) l) d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d l)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 #s(approx (pow (/ d h) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d h)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) 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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
#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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 d))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h)))))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))
(*.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (neg.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 M (*.f64 (/.f64 M l) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
Calls

3 calls:

30.0ms
d
29.0ms
l
29.0ms
h
Results
AccuracySegmentsBranch
78.3%2l
78.3%2d
78.3%2h
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes154.0ms (0.7%)

Memory
-11.8MiB live, 186.8MiB allocated
Counts
96 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) l) d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d l)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 #s(approx (pow (/ d h) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d h)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) 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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h)))))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D d)) l) d))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
#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 h (fma.f64 (*.f64 D (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l)))))) (*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 h h))))))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (neg.f64 d)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (*.f64 h h) l)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 l (*.f64 l l))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 M M))) d)) (neg.f64 h)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) l)) (sqrt.f64 (/.f64 h (*.f64 d (*.f64 d d))))) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 d))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) h)))))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))))
(*.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l))))) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (neg.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (+.f64 (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (*.f64 (*.f64 d (sqrt.f64 (*.f64 d h))) l)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d)))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 M (*.f64 (/.f64 M l) (*.f64 #s(literal -1/8 binary64) (*.f64 D D)))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 (*.f64 d d) h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) l)) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

4 calls:

54.0ms
d
32.0ms
h
31.0ms
l
30.0ms
(*.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))))
Results
AccuracySegmentsBranch
74.6%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))))
76.1%3d
76.2%3h
75.2%2l
Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes208.0ms (0.9%)

Memory
33.7MiB live, 268.4MiB allocated
Counts
79 → 4
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) l) d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d l)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 #s(approx (pow (/ d h) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d h)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))))))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

7 calls:

58.0ms
h
30.0ms
d
25.0ms
D
25.0ms
M
24.0ms
l
Results
AccuracySegmentsBranch
67.6%1M
70.7%2D
70.7%2(*.f64 M D)
73.1%4d
73.0%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))))
73.8%4h
74.7%4l
Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes53.0ms (0.2%)

Memory
-18.4MiB live, 100.2MiB allocated
Counts
78 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (/.f64 D d)) l) d))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d l)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D l) (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64))))) (*.f64 d d)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 #s(approx (pow (/ d h) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d h)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (/.f64 h l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 h (*.f64 h h)) (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #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 d l)) (sqrt.f64 (/.f64 h d))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

2 calls:

25.0ms
l
21.0ms
(*.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))))
Results
AccuracySegmentsBranch
73.0%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))))
70.9%2l
Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes124.0ms (0.5%)

Memory
-8.0MiB live, 186.9MiB allocated
Counts
70 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64)))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #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 d l)) (sqrt.f64 (/.f64 h d))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

5 calls:

22.0ms
h
22.0ms
D
21.0ms
l
19.0ms
(*.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))))
18.0ms
(*.f64 M D)
Results
AccuracySegmentsBranch
69.6%2(*.f64 M D)
69.2%2D
70.5%3h
69.9%2l
72.0%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))))
Compiler

Compiled 66 to 43 computations (34.8% saved)

regimes173.0ms (0.7%)

Memory
-8.0MiB live, 331.3MiB allocated
Counts
69 → 4
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l)))))) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 d (*.f64 d l))))))) (sqrt.f64 l))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

7 calls:

32.0ms
d
28.0ms
M
27.0ms
l
21.0ms
(*.f64 M D)
21.0ms
D
Results
AccuracySegmentsBranch
66.5%4h
62.1%2M
63.1%3D
65.4%3(*.f64 M D)
65.5%3l
69.1%5d
68.4%4(*.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))))
Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes61.0ms (0.3%)

Memory
14.6MiB live, 132.8MiB allocated
Counts
66 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l)))))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d))))))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 h (*.f64 (*.f64 M (*.f64 M (*.f64 D #s(literal 1/8 binary64)))) (/.f64 D (*.f64 d (*.f64 d l))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 h M) (*.f64 M (*.f64 D (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 d (*.f64 d l))))))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 h (*.f64 D #s(literal 1/8 binary64)))) (*.f64 d (*.f64 d l))) D))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h (*.f64 d (*.f64 d d))))))) l)))) (sqrt.f64 (/.f64 l d)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

3 calls:

20.0ms
d
19.0ms
l
18.0ms
(*.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))))
Results
AccuracySegmentsBranch
66.9%4l
65.0%3d
65.4%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))))
Compiler

Compiled 52 to 32 computations (38.5% saved)

regimes98.0ms (0.4%)

Memory
5.4MiB live, 160.3MiB allocated
Counts
57 → 5
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (neg.f64 h) (*.f64 (neg.f64 d) (/.f64 d l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 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 (fma.f64 d (sqrt.f64 (*.f64 l (/.f64 (*.f64 l l) h))) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (*.f64 h l)))))) (*.f64 l l)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (*.f64 l (*.f64 l l)) h)) (*.f64 (sqrt.f64 (*.f64 h l)) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l)))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d d)) (/.f64 D 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

5 calls:

28.0ms
h
19.0ms
l
16.0ms
(*.f64 M D)
16.0ms
d
15.0ms
(*.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))))
Results
AccuracySegmentsBranch
64.1%4h
67.1%5d
63.2%3l
58.9%2(*.f64 M D)
63.9%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))))
Compiler

Compiled 66 to 43 computations (34.8% saved)

regimes70.0ms (0.3%)

Memory
8.1MiB live, 83.8MiB allocated
Counts
47 → 5
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

3 calls:

35.0ms
d
17.0ms
(*.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))))
14.0ms
M
Results
AccuracySegmentsBranch
59.2%2M
62.6%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))))
66.4%5d
Compiler

Compiled 52 to 32 computations (38.5% saved)

regimes49.0ms (0.2%)

Memory
-30.9MiB live, 52.9MiB allocated
Counts
45 → 5
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) 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)))) (/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

2 calls:

24.0ms
l
21.0ms
d
Results
AccuracySegmentsBranch
66.2%5l
63.0%3d
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes73.0ms (0.3%)

Memory
17.2MiB live, 55.5MiB allocated
Counts
44 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l))))))
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

5 calls:

19.0ms
(*.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))))
13.0ms
h
13.0ms
l
13.0ms
d
12.0ms
D
Results
AccuracySegmentsBranch
62.2%3h
62.3%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))))
62.2%3d
54.1%5D
61.2%3l
Compiler

Compiled 64 to 42 computations (34.4% saved)

regimes44.0ms (0.2%)

Memory
-1.3MiB live, 36.4MiB allocated
Counts
43 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Outputs
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
Calls

2 calls:

30.0ms
d
11.0ms
(*.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))))
Results
AccuracySegmentsBranch
62.2%3d
56.2%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))))
Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes77.0ms (0.3%)

Memory
14.8MiB live, 98.1MiB allocated
Counts
42 → 4
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 #s(literal 1/4 binary64) (*.f64 D D))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (fma.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l)))))
(*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
Calls

5 calls:

24.0ms
h
14.0ms
M
12.0ms
l
12.0ms
d
12.0ms
(*.f64 M D)
Results
AccuracySegmentsBranch
49.8%2(*.f64 M D)
51.4%3M
60.7%4l
58.0%3h
59.4%4d
Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes65.0ms (0.3%)

Memory
-13.2MiB live, 64.0MiB allocated
Counts
39 → 4
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 d (*.f64 d l))))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (*.f64 D D)) (*.f64 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 d (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D #s(literal 1/8 binary64))) (/.f64 D (*.f64 l (*.f64 d d)))))) (sqrt.f64 (/.f64 (*.f64 d 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
Calls

3 calls:

31.0ms
d
19.0ms
l
11.0ms
h
Results
AccuracySegmentsBranch
59.9%5d
53.7%3h
58.3%4l
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes37.0ms (0.2%)

Memory
-13.7MiB live, 67.9MiB allocated
Counts
35 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (*.f64 h #s(approx (+ (* (sqrt (/ 1 (* d (* (* d d) h)))) (* (* -1/8 (* D D)) (/ (* M M) l))) (sqrt (/ d (* h (* h h))))) (sqrt.f64 (/.f64 d (*.f64 h (*.f64 h h))))))) (sqrt.f64 (/.f64 l d)))
Outputs
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
Calls

3 calls:

13.0ms
l
11.0ms
(*.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))))
10.0ms
d
Results
AccuracySegmentsBranch
55.5%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))))
56.8%4d
54.1%4l
Compiler

Compiled 52 to 32 computations (38.5% saved)

regimes11.0ms (0%)

Memory
24.3MiB live, 24.3MiB allocated
Counts
33 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
Outputs
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
Calls

1 calls:

9.0ms
(*.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))))
Results
AccuracySegmentsBranch
55.4%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))))
Compiler

Compiled 40 to 22 computations (45% saved)

regimes12.0ms (0.1%)

Memory
-14.3MiB live, 23.6MiB allocated
Counts
32 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) 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)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 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 d l)) (sqrt.f64 (/.f64 h d))))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
Calls

1 calls:

10.0ms
(*.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))))
Results
AccuracySegmentsBranch
55.3%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))))
Compiler

Compiled 40 to 22 computations (45% saved)

regimes11.0ms (0%)

Memory
23.7MiB live, 23.7MiB allocated
Counts
31 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 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)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 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 d l)) (sqrt.f64 (/.f64 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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
Calls

1 calls:

8.0ms
(*.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))))
Results
AccuracySegmentsBranch
55.3%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))))
Compiler

Compiled 40 to 22 computations (45% saved)

regimes41.0ms (0.2%)

Memory
-0.9MiB live, 78.7MiB allocated
Counts
30 → 3
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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)))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) 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 l)) (sqrt.f64 (/.f64 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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
Calls

4 calls:

9.0ms
d
9.0ms
h
9.0ms
l
8.0ms
(*.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))))
Results
AccuracySegmentsBranch
50.6%3l
51.1%3h
51.3%3d
51.9%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))))
Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes68.0ms (0.3%)

Memory
-22.8MiB live, 134.1MiB allocated
Counts
29 → 4
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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
Calls

7 calls:

12.0ms
l
10.0ms
h
9.0ms
d
9.0ms
(*.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))))
9.0ms
M
Results
AccuracySegmentsBranch
52.0%4l
45.8%2D
48.6%2h
47.8%2(*.f64 M D)
48.6%2d
46.6%2M
48.1%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))))
Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes36.0ms (0.2%)

Memory
29.0MiB live, 67.5MiB allocated
Counts
28 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 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)))) (*.f64 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
Calls

4 calls:

9.0ms
d
9.0ms
l
8.0ms
h
8.0ms
(*.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))))
Results
AccuracySegmentsBranch
48.1%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))))
46.5%2h
48.2%3d
50.2%4l
Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes88.0ms (0.4%)

Memory
-40.2MiB live, 80.8MiB allocated
Counts
26 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l 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 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 l d) h)) (sqrt.f64 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)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
Calls

5 calls:

35.0ms
l
8.0ms
M
8.0ms
d
8.0ms
(*.f64 M D)
7.0ms
(*.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))))
Results
AccuracySegmentsBranch
44.0%2M
46.5%2d
46.5%2l
44.1%2(*.f64 M D)
44.1%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))))
Compiler

Compiled 66 to 43 computations (34.8% saved)

regimes24.0ms (0.1%)

Memory
17.1MiB live, 55.9MiB allocated
Counts
22 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 h (/.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(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 l d) (/.f64 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 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 h l) 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 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 l d) (neg.f64 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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (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 d l) (neg.f64 d))) (sqrt.f64 (neg.f64 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)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
Calls

3 calls:

8.0ms
l
7.0ms
d
7.0ms
h
Results
AccuracySegmentsBranch
46.3%2l
46.3%2h
46.3%2d
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes19.0ms (0.1%)

Memory
10.4MiB live, 49.2MiB allocated
Counts
12 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 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 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)))) (*.f64 d (sqrt.f64 (/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) 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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 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)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
Calls

4 calls:

5.0ms
h
4.0ms
l
4.0ms
d
4.0ms
D
Results
AccuracySegmentsBranch
32.9%3D
44.8%2l
44.0%2h
44.0%2d
Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes19.0ms (0.1%)

Memory
12.2MiB live, 51.1MiB allocated
Counts
7 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d)))
#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 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 d (sqrt.f64 (*.f64 h l))))
Calls

6 calls:

4.0ms
(*.f64 M D)
3.0ms
d
3.0ms
h
3.0ms
M
3.0ms
l
Results
AccuracySegmentsBranch
41.7%2d
41.3%2h
30.5%2M
32.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))))
31.9%3(*.f64 M D)
42.1%2l
Compiler

Compiled 72 to 48 computations (33.3% saved)

regimes10.0ms (0%)

Memory
-19.2MiB live, 20.8MiB allocated
Counts
5 → 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)))) (/.f64 d (sqrt.f64 (*.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)))) (sqrt.f64 (/.f64 (*.f64 d 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 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l))) 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)))) (sqrt.f64 (/.f64 (*.f64 d 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 d (sqrt.f64 (*.f64 h l))))
Calls

3 calls:

5.0ms
l
2.0ms
d
2.0ms
h
Results
AccuracySegmentsBranch
34.6%2h
35.8%2d
35.2%2l
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes12.0ms (0.1%)

Memory
-10.2MiB live, 26.9MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
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)))) (/.f64 d (sqrt.f64 (*.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 d (sqrt.f64 (*.f64 h l))))
Calls

7 calls:

3.0ms
M
1.0ms
(*.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))))
1.0ms
h
1.0ms
D
1.0ms
l
Results
AccuracySegmentsBranch
26.9%1(*.f64 M D)
26.9%1M
26.9%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))))
26.9%1D
26.9%1h
26.9%1l
26.9%1d
Compiler

Compiled 78 to 53 computations (32.1% saved)

bsearch63.0ms (0.3%)

Memory
5.3MiB live, 122.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
53.0ms
-5.018847079906515e-306
1.055337145470016e-303
Samples
25.0ms144×0valid
19.0ms131×0invalid
Compiler

Compiled 835 to 525 computations (37.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 34.0ms
ival-div: 11.0ms (32.3% of total)
ival-pow: 10.0ms (29.3% of total)
ival-mult: 9.0ms (26.4% of total)
ival-pow2: 3.0ms (8.8% of total)
ival-sub: 1.0ms (2.9% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
5.7MiB live, 5.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
-5.018847079906515e-306
1.055337145470016e-303
Compiler

Compiled 817 to 516 computations (36.8% saved)

bsearch17.0ms (0.1%)

Memory
-5.5MiB live, 33.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
14.0ms
-5.018847079906515e-306
1.055337145470016e-303
Samples
5.0ms32×0valid
5.0ms35×0invalid
Compiler

Compiled 754 to 480 computations (36.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 8.0ms
ival-div: 3.0ms (38.4% of total)
ival-mult: 2.0ms (25.6% of total)
ival-pow: 2.0ms (25.6% of total)
ival-pow2: 1.0ms (12.8% of total)
ival-sub: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch50.0ms (0.2%)

Memory
8.1MiB live, 83.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
45.0ms
1.6778282595809605e+103
6.309638281772372e+107
Samples
23.0ms128×0valid
14.0ms101×0invalid
Compiler

Compiled 611 to 398 computations (34.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 29.0ms
ival-div: 10.0ms (34.3% of total)
ival-mult: 9.0ms (30.9% of total)
ival-pow: 7.0ms (24% of total)
ival-pow2: 2.0ms (6.9% of total)
ival-sub: 1.0ms (3.4% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch405.0ms (1.7%)

Memory
-196.2MiB live, 161.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
299.0ms
1.4268366249626574e+49
5.249616867804771e+50
53.0ms
2.8072338523370743
1340.2889836737747
24.0ms
-2.437089415362812e-164
-1.775411655482102e-164
Samples
305.0ms288×0valid
47.0ms308×0invalid
Compiler

Compiled 1 335 to 861 computations (35.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 328.0ms
ival-pow: 279.0ms (85.2% of total)
ival-div: 20.0ms (6.1% of total)
ival-mult: 19.0ms (5.8% of total)
ival-pow2: 6.0ms (1.8% of total)
ival-sub: 3.0ms (0.9% of total)
exact: 1.0ms (0.3% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.852046951813866e-179
0.0
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
3.8MiB live, 3.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.852046951813866e-179
0.0
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
6.6MiB live, 6.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.852046951813866e-179
0.0
0.0ms
-4.643190035052556e+292
-1.5455923984294192e+289
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
2.9MiB live, 2.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.852046951813866e-179
0.0
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch255.0ms (1.1%)

Memory
-7.2MiB live, 460.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
48.0ms
4.0830935021737075e-151
1.263690640010016e-146
53.0ms
-1.5085199447551866e-294
-2.649357606958698e-297
49.0ms
-6.416932403363605e-107
-2.5658985231373284e-108
78.0ms
-4.527087554922783e+203
-1.700644854271908e+192
Samples
94.0ms528×0valid
89.0ms597×0invalid
Compiler

Compiled 2 092 to 1 354 computations (35.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 135.0ms
ival-div: 48.0ms (35.6% of total)
ival-mult: 45.0ms (33.4% of total)
ival-pow: 23.0ms (17.1% of total)
ival-pow2: 11.0ms (8.2% of total)
ival-sub: 5.0ms (3.7% of total)
ival-true: 1.0ms (0.7% of total)
exact: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)

bsearch111.0ms (0.5%)

Memory
-16.2MiB live, 199.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
4.0830935021737075e-151
1.263690640010016e-146
1.0ms
-1.5085199447551866e-294
-2.649357606958698e-297
43.0ms
-4.869857735480644e-151
-4.024579718872237e-153
47.0ms
-4.527087554922783e+203
-1.700644854271908e+192
Samples
39.0ms240×0valid
33.0ms244×0invalid
Compiler

Compiled 2 092 to 1 354 computations (35.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 56.0ms
ival-div: 20.0ms (35.9% of total)
ival-mult: 15.0ms (26.9% of total)
ival-pow: 10.0ms (18% of total)
ival-pow2: 6.0ms (10.8% of total)
ival-sub: 2.0ms (3.6% of total)
exact: 1.0ms (1.8% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch192.0ms (0.8%)

Memory
34.4MiB live, 260.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.4268366249626574e+49
5.249616867804771e+50
58.0ms
1.112482012635792e-91
1.3973820549970085e-88
85.0ms
-2.3973640626921862e-300
1.640331739218159e-306
33.0ms
-4.1370238522483046e+91
-8.653178445025458e+90
Samples
72.0ms356×0invalid
70.0ms384×0valid
Compiler

Compiled 2 136 to 1 374 computations (35.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 116.0ms
ival-mult: 44.0ms (37.9% of total)
ival-div: 37.0ms (31.9% of total)
ival-pow: 23.0ms (19.8% of total)
ival-pow2: 7.0ms (6% of total)
ival-sub: 3.0ms (2.6% of total)
ival-true: 1.0ms (0.9% of total)
exact: 1.0ms (0.9% of total)
ival-assert: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.8MiB live, 1.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.852046951813866e-179
0.0
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch82.0ms (0.4%)

Memory
18.6MiB live, 171.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
76.0ms
2.6755470662551825e-129
4.050110991287081e-122
1.0ms
-1.5085199447551866e-294
-2.649357606958698e-297
Samples
37.0ms144×0valid
23.0ms142×0invalid
Compiler

Compiled 1 104 to 701 computations (36.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 47.0ms
ival-div: 13.0ms (27.5% of total)
ival-mult: 13.0ms (27.5% of total)
ival-pow2: 9.0ms (19.1% of total)
ival-pow: 8.0ms (16.9% of total)
ival-sub: 4.0ms (8.5% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch77.0ms (0.3%)

Memory
-30.8MiB live, 127.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
57.0ms
1.1729305765698548e-99
1.112482012635792e-91
3.0ms
-2.3973640626921862e-300
1.640331739218159e-306
1.0ms
-4.1370238522483046e+91
-8.653178445025458e+90
Samples
25.0ms142×0invalid
22.0ms144×0valid
Compiler

Compiled 1 514 to 983 computations (35.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 32.0ms
ival-div: 10.0ms (31.3% of total)
ival-mult: 9.0ms (28.2% of total)
ival-pow: 9.0ms (28.2% of total)
ival-pow2: 3.0ms (9.4% of total)
ival-sub: 1.0ms (3.1% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch136.0ms (0.6%)

Memory
23.8MiB live, 274.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.1729305765698548e-99
1.112482012635792e-91
60.0ms
-2.311258061682833e-275
-1.6001947629890155e-282
64.0ms
-5.103471820033467e-142
-5.267992435399623e-151
Samples
47.0ms288×0valid
47.0ms291×0invalid
Compiler

Compiled 1 438 to 948 computations (34.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 71.0ms
ival-div: 25.0ms (35% of total)
ival-mult: 19.0ms (26.6% of total)
ival-pow: 18.0ms (25.2% of total)
ival-pow2: 6.0ms (8.4% of total)
ival-sub: 3.0ms (4.2% of total)
exact: 1.0ms (1.4% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
2.1MiB live, 2.1MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.852046951813866e-179
0.0
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch3.0ms (0%)

Memory
-36.8MiB live, 1.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.852046951813866e-179
0.0
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch0.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.423433432413341e+192
-2.4045257477026533e+129
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.423433432413341e+192
-2.4045257477026533e+129
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch0.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-3.3643615344191997e+224
-1.5251161077037445e+198
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch182.0ms (0.8%)

Memory
23.0MiB live, 250.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
39.0ms
2.3395036122271845e-292
2.8043972755805357e-291
54.0ms
-1.2629621251030016e-255
-5.659416903367257e-265
66.0ms
-3.61237611412798e-140
-5.103471820033467e-142
Samples
78.0ms352×0valid
58.0ms344×0invalid
Compiler

Compiled 866 to 590 computations (31.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 112.0ms
ival-pow: 45.0ms (40.2% of total)
ival-mult: 29.0ms (25.9% of total)
ival-div: 25.0ms (22.3% of total)
ival-pow2: 9.0ms (8% of total)
ival-sub: 3.0ms (2.7% of total)
ival-true: 1.0ms (0.9% of total)
exact: 1.0ms (0.9% of total)
ival-assert: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.0
8.344034983205176e-264
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch76.0ms (0.3%)

Memory
-5.0MiB live, 40.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
72.0ms
7.987680636061539e-256
2.6642721159181063e-255
Samples
59.0ms80×0valid
9.0ms73×0invalid
Compiler

Compiled 193 to 135 computations (30.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 62.0ms
ival-mult: 51.0ms (82% of total)
ival-div: 5.0ms (8% of total)
ival-pow: 3.0ms (4.8% of total)
ival-pow2: 2.0ms (3.2% of total)
ival-sub: 1.0ms (1.6% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
7.987680636061539e-256
2.6642721159181063e-255
Compiler

Compiled 193 to 135 computations (30.1% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
2.3395036122271845e-292
2.8043972755805357e-291
Compiler

Compiled 223 to 162 computations (27.4% saved)

bsearch6.0ms (0%)

Memory
12.5MiB live, 12.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
6.0ms
2.3395036122271845e-292
2.8043972755805357e-291
Samples
3.0ms16×0valid
2.0ms10×0invalid
Compiler

Compiled 217 to 156 computations (28.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.0ms
ival-div: 1.0ms (29.6% of total)
ival-mult: 1.0ms (29.6% of total)
ival-pow: 1.0ms (29.6% of total)
ival-sub: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-pow2: 0.0ms (0% of total)

bsearch35.0ms (0.1%)

Memory
-24.5MiB live, 49.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
28.0ms
-4.869857735480644e-151
-4.024579718872237e-153
Samples
15.0ms64×0valid
8.0ms69×0invalid
Compiler

Compiled 239 to 163 computations (31.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-div: 10.0ms (53.4% of total)
ival-mult: 4.0ms (21.4% of total)
ival-pow: 3.0ms (16% of total)
ival-sub: 1.0ms (5.3% of total)
ival-pow2: 1.0ms (5.3% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

simplify74.0ms (0.3%)

Memory
-11.1MiB live, 84.1MiB allocated
Algorithm
egg-herbie
Rules
280×*-commutative_binary64
262×neg-mul-1_binary64
206×unsub-neg_binary64
152×distribute-rgt-neg-in_binary64
148×distribute-lft-neg-in_binary64
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
03424640
14914640
26204640
37324639
48094639
510004639
612844639
712994639
813004639
Stop Event
saturated
Calls
Call 1
Inputs
(if (<=.f64 h #s(literal -202402253307311/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))))
(if (<=.f64 h #s(literal -202402253307311/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))))
(if (<=.f64 h #s(literal 151801689980483/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))))
(if (<=.f64 l #s(literal 600000000000000046473455524883116661202489643467779290086853867826709171176518251711725606799149906700271616 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))))
(if (<=.f64 l #s(literal -5964928630266427/259344723055062059907025491480697571938277889515152306249728583105665800713306759149981690559193987143012367913206299323899696942213235956742929677132122730441323862712594345230336 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64))) (if (<=.f64 l #s(literal 6417629469002957/2251799813685248 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d)))))) (if (<=.f64 l #s(literal 520000000000000039674803173677812417133817848922112 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 (*.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)))) #s(literal -40000000000000000530263959134296650722746244358345840142528125911769970907617012858463917672157449998909498554263568363952491898600028103138206953210986926743629581261021098587444232750232858470317984807330649410342155342294546390088430246843766074240114997507336380714205155856460222902042624 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l))))) (if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l))))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 d #s(literal -350000000000000006403008544515173738882898756088254343815825895591235511906651686782601099963743649191296365943245729833096018630177007187328386448551971233653221889264560198541737013304167960007409664 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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (if (<=.f64 d #s(literal -6874982075418585/2644223875160994395807661232131084159313618731857124877138595181097623164945245383300756841758861139390364848100093433217024 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 d #s(literal -3976209583413865/1472670216079209191611846812294369061779846741149537544383939224844146080198663889983147846225162535085015972903906454385940805786127700971461406151798572026902674582936498055383467782973408003026559655543480367258322130389749455925034296201550456726842167383528130955181647838728025835969211239052281644132073472 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 810812239707753/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))))
(if (<=.f64 d #s(literal -350000000000000030877847253511801646499123314026008691163476760452866532937037575057197138351814994611904470325011213455516321356415773974498762327588720825643902510828905376113481973399087492989441802240 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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (if (<=.f64 d #s(literal -5189198334129619/471745303102692669030194322623533611364615152552055053547025787530703020299018606510765840647207345942683546878845480612471323078740599079070179281429087005456174415872 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D)))) (if (<=.f64 d #s(literal -3976209583413865/1472670216079209191611846812294369061779846741149537544383939224844146080198663889983147846225162535085015972903906454385940805786127700971461406151798572026902674582936498055383467782973408003026559655543480367258322130389749455925034296201550456726842167383528130955181647838728025835969211239052281644132073472 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 810812239707753/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))))
(if (<=.f64 l #s(literal -22499999999999999528588066462479243854394287202819786349440101939555577796798024897265664000 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) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 l #s(literal 5733746539975179/286687326998758938951352611912760867599570623646035140467198604923365359511060601008752319138765710819328 binary64)) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 l #s(literal 520000000000000039674803173677812417133817848922112 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 d #s(literal -3976209583413865/1472670216079209191611846812294369061779846741149537544383939224844146080198663889983147846225162535085015972903906454385940805786127700971461406151798572026902674582936498055383467782973408003026559655543480367258322130389749455925034296201550456726842167383528130955181647838728025835969211239052281644132073472 binary64)) (*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 d #s(literal 8428721085853179/3121748550315992231381597229793166305748598142664971150859156959625371738819765620120306103063491971159826931121406622895447975679288285306290176 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 l #s(literal -22499999999999999528588066462479243854394287202819786349440101939555577796798024897265664000 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) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 l #s(literal 1761406937080375/18347988927920572092886567162416695526372519913346248989900710715095383008707878464560148424881005492436992 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -2951287449220337/7198262071269114212496861612297570974191515389283066612961208916178940129074380592510465097766225371439873457013633432197133225688790879502413624289384262168215552 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) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal -8475800506063247/5231975621026695903068481684863290090631859432155925817596437443214604741820977160611320209061014932263645863855239974732359107840294502166008094518895788478483675671300894035850134084503110909120094815504417224113077119759472054472248800754920440876255467030120381917802944253736633001385354330112 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 l #s(literal 1761406937080375/18347988927920572092886567162416695526372519913346248989900710715095383008707878464560148424881005492436992 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))))
(if (<=.f64 (*.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)))) #s(literal -5000000000000000331137566598036511445407389453390846087787359307030935353460273357335189277235541978069813652595228101912165434051752871448770458498755506020260404406084020667075938662683246592 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 (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))))
(if (<=.f64 (*.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)))) #s(literal -5000000000000000331137566598036511445407389453390846087787359307030935353460273357335189277235541978069813652595228101912165434051752871448770458498755506020260404406084020667075938662683246592 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 (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))))
(if (<=.f64 (*.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)))) #s(literal -199999999999999993909807035896639004185929614489498422429684950520219389765747426705377309150610171428074364818449682269011785762366757412160506499038165807860216189579281066776703092169896013900652031477585337801129043427328 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 (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))))
(if (<=.f64 l #s(literal -3706990736470529/6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057152 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) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal -5264097942609339/9076030935533343889148330677184451660957398691768765008885326289770145612551296225251271450782204288267814476258502032778653474399077793626653018683486295323382390383590453332169716856898789897889643528945016096228440849041002686084943230837088977557446564364344140092918489677824 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l))))))) (if (<=.f64 l #s(literal 5617791046444737/22471164185778948846616314884862809170224712236778832159178760144716584475687620391588559665300942002640014234983924169707348721101802077811605928829934265547220986678108185659537777450155761764931635369010625721104768835292807860184239138817603404645418813835573287279993405742309964538104419541203028017152 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 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 (*.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)))) #s(literal 0 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))))
(if (<=.f64 d #s(literal 6762169998536515/8452712498170643941637436558664265704301557216577944354047371344426782440907597751590676094202515006314790319892114058862117560952042968596008623655407033230534186943984081346699704282822823056848387726531379014466368452684024987821414350380272583623832617294363807973376 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 d l)) (sqrt.f64 (/.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal 6762169998536515/8452712498170643941637436558664265704301557216577944354047371344426782440907597751590676094202515006314790319892114058862117560952042968596008623655407033230534186943984081346699704282822823056848387726531379014466368452684024987821414350380272583623832617294363807973376 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 d l)) (sqrt.f64 (/.f64 d 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 5617791046444737/22471164185778948846616314884862809170224712236778832159178760144716584475687620391588559665300942002640014234983924169707348721101802077811605928829934265547220986678108185659537777450155761764931635369010625721104768835292807860184239138817603404645418813835573287279993405742309964538104419541203028017152 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 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 5842502688302527/22471164185778948846616314884862809170224712236778832159178760144716584475687620391588559665300942002640014234983924169707348721101802077811605928829934265547220986678108185659537777450155761764931635369010625721104768835292807860184239138817603404645418813835573287279993405742309964538104419541203028017152 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 h l))) (neg.f64 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 d (sqrt.f64 (*.f64 h l)))))
(if (<=.f64 d #s(literal -8680113577089545/1886981212410770676120777290494134445458460610208220214188103150122812081196074426043063362588829383770734187515381922449885292314962396316280717125716348021824697663488 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 d 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 d (sqrt.f64 (*.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 d (sqrt.f64 (*.f64 h l))))
Outputs
(if (<=.f64 h #s(literal -202402253307311/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))))
(if (<=.f64 h #s(literal -202402253307311/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) (sqrt.f64 (neg.f64 d)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))))
(if (<=.f64 h #s(literal -202402253307311/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))))
(if (<=.f64 h #s(literal -202402253307311/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))))
(if (<=.f64 h #s(literal 151801689980483/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))))
(if (<=.f64 h #s(literal 151801689980483/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))))
(if (<=.f64 l #s(literal 600000000000000046473455524883116661202489643467779290086853867826709171176518251711725606799149906700271616 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))))
(if (<=.f64 l #s(literal 600000000000000046473455524883116661202489643467779290086853867826709171176518251711725606799149906700271616 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))))
(if (<=.f64 l #s(literal -5964928630266427/259344723055062059907025491480697571938277889515152306249728583105665800713306759149981690559193987143012367913206299323899696942213235956742929677132122730441323862712594345230336 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64))) (if (<=.f64 l #s(literal 6417629469002957/2251799813685248 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d)))))) (if (<=.f64 l #s(literal 520000000000000039674803173677812417133817848922112 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))))))
(if (<=.f64 l #s(literal -5964928630266427/259344723055062059907025491480697571938277889515152306249728583105665800713306759149981690559193987143012367913206299323899696942213235956742929677132122730441323862712594345230336 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 l (*.f64 d #s(literal 2 binary64)))) (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D (neg.f64 M)) d))) #s(literal 1 binary64))) (if (<=.f64 l #s(literal 6417629469002957/2251799813685248 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M (*.f64 h D)) d)))))) (if (<=.f64 l #s(literal 520000000000000039674803173677812417133817848922112 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) h)) #s(literal 1 binary64))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 M D) (*.f64 l (*.f64 d #s(literal 2 binary64)))) (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D (neg.f64 M)) d))) #s(literal 1 binary64))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (/.f64 (neg.f64 (*.f64 M D)) (*.f64 (*.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))) h #s(literal 1 binary64))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d)) (/.f64 (*.f64 M D) (*.f64 l (*.f64 d (neg.f64 #s(literal 2 binary64)))))) h #s(literal 1 binary64))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 (*.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)))) #s(literal -40000000000000000530263959134296650722746244358345840142528125911769970907617012858463917672157449998909498554263568363952491898600028103138206953210986926743629581261021098587444232750232858470317984807330649410342155342294546390088430246843766074240114997507336380714205155856460222902042624 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l))))) (if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (*.f64 (*.f64 (*.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -40000000000000000530263959134296650722746244358345840142528125911769970907617012858463917672157449998909498554263568363952491898600028103138206953210986926743629581261021098587444232750232858470317984807330649410342155342294546390088430246843766074240114997507336380714205155856460222902042624 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 D (*.f64 M M)) (*.f64 h #s(literal 1/8 binary64)))) (*.f64 d l))))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 h (/.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 (*.f64 d #s(literal 2 binary64)) (*.f64 l (*.f64 d #s(literal 2 binary64)))))))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D))) (*.f64 d l))))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 D (*.f64 M M)) (*.f64 h #s(literal 1/8 binary64)))) (*.f64 d l))))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 d #s(literal -350000000000000006403008544515173738882898756088254343815825895591235511906651686782601099963743649191296365943245729833096018630177007187328386448551971233653221889264560198541737013304167960007409664 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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (if (<=.f64 d #s(literal -6874982075418585/2644223875160994395807661232131084159313618731857124877138595181097623164945245383300756841758861139390364848100093433217024 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 M h) M)))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 d #s(literal -3976209583413865/1472670216079209191611846812294369061779846741149537544383939224844146080198663889983147846225162535085015972903906454385940805786127700971461406151798572026902674582936498055383467782973408003026559655543480367258322130389749455925034296201550456726842167383528130955181647838728025835969211239052281644132073472 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 810812239707753/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))))
(if (<=.f64 d #s(literal -350000000000000006403008544515173738882898756088254343815825895591235511906651686782601099963743649191296365943245729833096018630177007187328386448551971233653221889264560198541737013304167960007409664 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (*.f64 l (/.f64 h d)))))) (if (<=.f64 d #s(literal -6874982075418585/2644223875160994395807661232131084159313618731857124877138595181097623164945245383300756841758861139390364848100093433217024 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 M (*.f64 h M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 d #s(literal -3976209583413865/1472670216079209191611846812294369061779846741149537544383939224844146080198663889983147846225162535085015972903906454385940805786127700971461406151798572026902674582936498055383467782973408003026559655543480367258322130389749455925034296201550456726842167383528130955181647838728025835969211239052281644132073472 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 810812239707753/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))))
(if (<=.f64 d #s(literal -350000000000000030877847253511801646499123314026008691163476760452866532937037575057197138351814994611904470325011213455516321356415773974498762327588720825643902510828905376113481973399087492989441802240 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) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))) (if (<=.f64 d #s(literal -5189198334129619/471745303102692669030194322623533611364615152552055053547025787530703020299018606510765840647207345942683546878845480612471323078740599079070179281429087005456174415872 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (/.f64 (*.f64 (*.f64 h #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)) (*.f64 d (*.f64 d l))) D)))) (if (<=.f64 d #s(literal -3976209583413865/1472670216079209191611846812294369061779846741149537544383939224844146080198663889983147846225162535085015972903906454385940805786127700971461406151798572026902674582936498055383467782973408003026559655543480367258322130389749455925034296201550456726842167383528130955181647838728025835969211239052281644132073472 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 810812239707753/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))))
(if (<=.f64 d #s(literal -350000000000000030877847253511801646499123314026008691163476760452866532937037575057197138351814994611904470325011213455516321356415773974498762327588720825643902510828905376113481973399087492989441802240 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 (neg.f64 d)) (sqrt.f64 (neg.f64 (*.f64 l (/.f64 h d)))))) (if (<=.f64 d #s(literal -5189198334129619/471745303102692669030194322623533611364615152552055053547025787530703020299018606510765840647207345942683546878845480612471323078740599079070179281429087005456174415872 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 D (/.f64 (*.f64 (*.f64 D (*.f64 M M)) (*.f64 h #s(literal 1/8 binary64))) (*.f64 d (*.f64 d l))))))) (if (<=.f64 d #s(literal -3976209583413865/1472670216079209191611846812294369061779846741149537544383939224844146080198663889983147846225162535085015972903906454385940805786127700971461406151798572026902674582936498055383467782973408003026559655543480367258322130389749455925034296201550456726842167383528130955181647838728025835969211239052281644132073472 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 810812239707753/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))))
(if (<=.f64 l #s(literal -22499999999999999528588066462479243854394287202819786349440101939555577796798024897265664000 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) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 l #s(literal 5733746539975179/286687326998758938951352611912760867599570623646035140467198604923365359511060601008752319138765710819328 binary64)) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 l #s(literal 520000000000000039674803173677812417133817848922112 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))))
(if (<=.f64 l #s(literal -22499999999999999528588066462479243854394287202819786349440101939555577796798024897265664000 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 (neg.f64 d)) (*.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (/.f64 h d))))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))) #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (if (<=.f64 l #s(literal 5733746539975179/286687326998758938951352611912760867599570623646035140467198604923365359511060601008752319138765710819328 binary64)) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 l #s(literal 520000000000000039674803173677812417133817848922112 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h (*.f64 M M))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) #s(literal -1/8 binary64)) (*.f64 d (*.f64 d l)))))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 d #s(literal -3976209583413865/1472670216079209191611846812294369061779846741149537544383939224844146080198663889983147846225162535085015972903906454385940805786127700971461406151798572026902674582936498055383467782973408003026559655543480367258322130389749455925034296201550456726842167383528130955181647838728025835969211239052281644132073472 binary64)) (*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 d #s(literal 8428721085853179/3121748550315992231381597229793166305748598142664971150859156959625371738819765620120306103063491971159826931121406622895447975679288285306290176 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 d #s(literal -3976209583413865/1472670216079209191611846812294369061779846741149537544383939224844146080198663889983147846225162535085015972903906454385940805786127700971461406151798572026902674582936498055383467782973408003026559655543480367258322130389749455925034296201550456726842167383528130955181647838728025835969211239052281644132073472 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))) #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (if (<=.f64 d #s(literal 8428721085853179/3121748550315992231381597229793166305748598142664971150859156959625371738819765620120306103063491971159826931121406622895447975679288285306290176 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))))))
(if (<=.f64 l #s(literal -22499999999999999528588066462479243854394287202819786349440101939555577796798024897265664000 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) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (*.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l)))))) (if (<=.f64 l #s(literal 1761406937080375/18347988927920572092886567162416695526372519913346248989900710715095383008707878464560148424881005492436992 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -22499999999999999528588066462479243854394287202819786349440101939555577796798024897265664000 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 (neg.f64 d)) (*.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (/.f64 h d))))) (if (<=.f64 l #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 D (*.f64 D (*.f64 #s(literal 1/8 binary64) (*.f64 h (*.f64 M M))))) (*.f64 d (*.f64 d l))))) #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))) (if (<=.f64 l #s(literal 1761406937080375/18347988927920572092886567162416695526372519913346248989900710715095383008707878464560148424881005492436992 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D (*.f64 D #s(literal 1/8 binary64)))) (*.f64 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 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -2951287449220337/7198262071269114212496861612297570974191515389283066612961208916178940129074380592510465097766225371439873457013633432197133225688790879502413624289384262168215552 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) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal -8475800506063247/5231975621026695903068481684863290090631859432155925817596437443214604741820977160611320209061014932263645863855239974732359107840294502166008094518895788478483675671300894035850134084503110909120094815504417224113077119759472054472248800754920440876255467030120381917802944253736633001385354330112 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 l #s(literal 1761406937080375/18347988927920572092886567162416695526372519913346248989900710715095383008707878464560148424881005492436992 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 (*.f64 D #s(literal 1/8 binary64)) D)) (*.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -2951287449220337/7198262071269114212496861612297570974191515389283066612961208916178940129074380592510465097766225371439873457013633432197133225688790879502413624289384262168215552 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 (neg.f64 d)) (*.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (/.f64 h d))))) (if (<=.f64 l #s(literal -8475800506063247/5231975621026695903068481684863290090631859432155925817596437443214604741820977160611320209061014932263645863855239974732359107840294502166008094518895788478483675671300894035850134084503110909120094815504417224113077119759472054472248800754920440876255467030120381917802944253736633001385354330112 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 l #s(literal 1761406937080375/18347988927920572092886567162416695526372519913346248989900710715095383008707878464560148424881005492436992 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 h (*.f64 M M)) (*.f64 D (*.f64 D #s(literal 1/8 binary64)))) (*.f64 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 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))))
(if (<=.f64 (*.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)))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -912488123524439/18249762470488780874564686422801165299572914028994239722316770071597100668834709546023651245269485599114569238294377629242754818885501751993010645278888856753007978697441059800331496768986415104 binary64)) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))))
(if (<=.f64 (*.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)))) #s(literal -5000000000000000331137566598036511445407389453390846087787359307030935353460273357335189277235541978069813652595228101912165434051752871448770458498755506020260404406084020667075938662683246592 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 (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -5000000000000000331137566598036511445407389453390846087787359307030935353460273357335189277235541978069813652595228101912165434051752871448770458498755506020260404406084020667075938662683246592 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 (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 #s(literal 1/8 binary64) (*.f64 D D))))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (*.f64 (sqrt.f64 (/.f64 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D (*.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))))
(if (<=.f64 (*.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)))) #s(literal -5000000000000000331137566598036511445407389453390846087787359307030935353460273357335189277235541978069813652595228101912165434051752871448770458498755506020260404406084020667075938662683246592 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 (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -5000000000000000331137566598036511445407389453390846087787359307030935353460273357335189277235541978069813652595228101912165434051752871448770458498755506020260404406084020667075938662683246592 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 (*.f64 l (*.f64 l l)))) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 #s(literal 1/8 binary64) (*.f64 D D))))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))))
(if (<=.f64 (*.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)))) #s(literal -199999999999999993909807035896639004185929614489498422429684950520219389765747426705377309150610171428074364818449682269011785762366757412160506499038165807860216189579281066776703092169896013900652031477585337801129043427328 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 (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) (if (<=.f64 (*.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)))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -199999999999999993909807035896639004185929614489498422429684950520219389765747426705377309150610171428074364818449682269011785762366757412160506499038165807860216189579281066776703092169896013900652031477585337801129043427328 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 (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) (if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 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 d l)) (sqrt.f64 (/.f64 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 h (*.f64 l (*.f64 l l)))) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))))
(if (<=.f64 l #s(literal -3706990736470529/6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057152 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) (neg.f64 d))) (*.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal -5264097942609339/9076030935533343889148330677184451660957398691768765008885326289770145612551296225251271450782204288267814476258502032778653474399077793626653018683486295323382390383590453332169716856898789897889643528945016096228440849041002686084943230837088977557446564364344140092918489677824 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l))))))) (if (<=.f64 l #s(literal 5617791046444737/22471164185778948846616314884862809170224712236778832159178760144716584475687620391588559665300942002640014234983924169707348721101802077811605928829934265547220986678108185659537777450155761764931635369010625721104768835292807860184239138817603404645418813835573287279993405742309964538104419541203028017152 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 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -3706990736470529/6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057152 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 (neg.f64 d)) (*.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (/.f64 h d))))) (if (<=.f64 l #s(literal -5264097942609339/9076030935533343889148330677184451660957398691768765008885326289770145612551296225251271450782204288267814476258502032778653474399077793626653018683486295323382390383590453332169716856898789897889643528945016096228440849041002686084943230837088977557446564364344140092918489677824 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l))))))) (if (<=.f64 l #s(literal 5617791046444737/22471164185778948846616314884862809170224712236778832159178760144716584475687620391588559665300942002640014234983924169707348721101802077811605928829934265547220986678108185659537777450155761764931635369010625721104768835292807860184239138817603404645418813835573287279993405742309964538104419541203028017152 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 (neg.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 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 (*.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)))) #s(literal 0 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))))
(if (<=.f64 (*.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 h l) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 0 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 d (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)) (/.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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))))
(if (<=.f64 d #s(literal 6762169998536515/8452712498170643941637436558664265704301557216577944354047371344426782440907597751590676094202515006314790319892114058862117560952042968596008623655407033230534186943984081346699704282822823056848387726531379014466368452684024987821414350380272583623832617294363807973376 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 d l)) (sqrt.f64 (/.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal 6762169998536515/8452712498170643941637436558664265704301557216577944354047371344426782440907597751590676094202515006314790319892114058862117560952042968596008623655407033230534186943984081346699704282822823056848387726531379014466368452684024987821414350380272583623832617294363807973376 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 d l)) (sqrt.f64 (/.f64 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 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 d #s(literal 6762169998536515/8452712498170643941637436558664265704301557216577944354047371344426782440907597751590676094202515006314790319892114058862117560952042968596008623655407033230534186943984081346699704282822823056848387726531379014466368452684024987821414350380272583623832617294363807973376 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 d l)) (sqrt.f64 (/.f64 d 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal 6762169998536515/8452712498170643941637436558664265704301557216577944354047371344426782440907597751590676094202515006314790319892114058862117560952042968596008623655407033230534186943984081346699704282822823056848387726531379014466368452684024987821414350380272583623832617294363807973376 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 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 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 l #s(literal 5617791046444737/22471164185778948846616314884862809170224712236778832159178760144716584475687620391588559665300942002640014234983924169707348721101802077811605928829934265547220986678108185659537777450155761764931635369010625721104768835292807860184239138817603404645418813835573287279993405742309964538104419541203028017152 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 h l))) (neg.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 5617791046444737/22471164185778948846616314884862809170224712236778832159178760144716584475687620391588559665300942002640014234983924169707348721101802077811605928829934265547220986678108185659537777450155761764931635369010625721104768835292807860184239138817603404645418813835573287279993405742309964538104419541203028017152 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 (neg.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 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 l #s(literal 5842502688302527/22471164185778948846616314884862809170224712236778832159178760144716584475687620391588559665300942002640014234983924169707348721101802077811605928829934265547220986678108185659537777450155761764931635369010625721104768835292807860184239138817603404645418813835573287279993405742309964538104419541203028017152 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 h l))) (neg.f64 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 d (sqrt.f64 (*.f64 h l)))))
(if (<=.f64 l #s(literal 5842502688302527/22471164185778948846616314884862809170224712236778832159178760144716584475687620391588559665300942002640014234983924169707348721101802077811605928829934265547220986678108185659537777450155761764931635369010625721104768835292807860184239138817603404645418813835573287279993405742309964538104419541203028017152 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 (neg.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 d (sqrt.f64 (*.f64 h l)))))
(if (<=.f64 d #s(literal -8680113577089545/1886981212410770676120777290494134445458460610208220214188103150122812081196074426043063362588829383770734187515381922449885292314962396316280717125716348021824697663488 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 d 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 d (sqrt.f64 (*.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 d (sqrt.f64 (*.f64 h l))))

soundness2.9s (12.5%)

Memory
37.6MiB live, 2 551.2MiB allocated
Rules
11 250×lower-*.f64
11 250×lower-*.f32
8 408×lower-*.f64
8 408×lower-*.f32
7 748×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01359762
13739622
213439596
331549561
455019561
082649486
0341972
1741940
22561940
311821940
433101940
535421940
636311940
736571940
836741940
936801940
1047671940
1148371940
1248461940
1348461940
1457421940
1572591940
1672771940
1772771940
1872771940
1972771940
0107371940
085483
0140445
1477416
23562395
08501390
070235
0125215
1381203
22438199
08216198
01942
03240
19440
251540
3505840
0812140
083448
0142417
1475398
23189390
08707388
024616237
170615903
2251415819
3557915761
0811715515
029316824
184616361
2295216250
3637216184
0815015848
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 15 094 to 5 780 computations (61.7% saved)

preprocess201.0ms (0.9%)

Memory
-3.2MiB live, 392.3MiB allocated
Remove

(sort M D)

(abs M)

(abs D)

Compiler

Compiled 6 130 to 850 computations (86.1% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...