Henrywood and Agarwal, Equation (12)

Time bar (total: 18.1s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze422.0ms (2.3%)

Memory
20.9MiB live, 603.6MiB 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)

sample6.1s (33.5%)

Memory
105.1MiB live, 7 498.4MiB allocated
Samples
2.6s13 114×0invalid
2.1s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 3.6s
ival-div: 1.4s (39.4% of total)
ival-mult: 1.1s (29.3% of total)
ival-pow: 703.0ms (19.4% of total)
ival-pow2: 244.0ms (6.7% of total)
ival-sub: 144.0ms (4% of total)
exact: 22.0ms (0.6% of total)
ival-true: 16.0ms (0.4% of total)
ival-assert: 10.0ms (0.3% of total)
Bogosity

explain396.0ms (2.2%)

Memory
-7.4MiB live, 667.8MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
610-3(4.10393115545242e-224 1.0913408556089732e+99 3.274537743458437e-107 4.1294406942130165e+174 -3.486701503198852e+207)(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
600-1(-4.64597061266815e-66 -0.2784728049590817 -6.380190476555719e+246 -4.9950615952928725e+266 1.961077568868055e+198)(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
510-0-(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
310-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))))
210-1(-1.4375583329035729e-254 -1.6353767116341447e-128 -3.861314367545943e+249 -6.18578773604804e-129 1.0863653620218215e-190)(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
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)))uflow-rescue360
(/.f64 d l)underflow36
pow.f64(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))uflow-rescue300
(/.f64 d h)underflow30
pow.f64(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))oflow-rescue280
(/.f64 d h)overflow28
pow.f64(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))oflow-rescue230
(/.f64 d l)overflow23
*.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*o160
*.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*o140
*.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*o140
(/.f64 d h)underflow30
(/.f64 d l)underflow36
(*.f64 (pow.f64 (/.f64 d 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))overflow88
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))overflow88
(/.f64 h l)overflow23
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))overflow86
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))overflow86
(*.f64 M D)overflow32
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))overflow44
/.f64(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))o/n90
(*.f64 M D)overflow32
*.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*u50
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))overflow88
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))overflow88
(*.f64 M D)overflow32
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))overflow44
(/.f64 h l)underflow39
*.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))underflow77
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))underflow77
(*.f64 M D)underflow29
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))underflow37
(/.f64 h l)overflow23
/.f64(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))u/n20
(*.f64 M D)underflow29
*.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*u10
Confusion
Predicted +Predicted -
+922
-27135
Precision
0.773109243697479
Recall
0.9787234042553191
Confusion?
Predicted +Predicted MaybePredicted -
+9202
-270135
Precision?
0.773109243697479
Recall?
0.9787234042553191
Freqs
test
numberfreq
0137
171
235
313
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
100.0ms512×0valid
Compiler

Compiled 501 to 92 computations (81.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 67.0ms
ival-div: 21.0ms (31.4% of total)
ival-pow: 20.0ms (29.9% of total)
ival-mult: 17.0ms (25.4% of total)
ival-pow2: 5.0ms (7.5% of total)
ival-sub: 2.0ms (3% of total)
ival-true: 1.0ms (1.5% of total)
exact: 1.0ms (1.5% of total)
ival-assert: 0.0ms (0% of total)

preprocess163.0ms (0.9%)

Memory
8.3MiB live, 160.2MiB allocated
Algorithm
egg-herbie
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 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
Symmetry

(abs D)

(abs M)

(sort M D)

Compiler

Compiled 35 to 22 computations (37.1% saved)

eval0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Compiler

Compiled 0 to 5 computations (-∞% saved)

prune1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
64.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 35 to 22 computations (37.1% saved)

simplify392.0ms (2.2%)

Memory
-142.8MiB live, 150.0MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff128
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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-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)))
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 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)) #s(literal 1 binary64)) (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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(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 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 #s(literal 1 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 h l) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D) #s(literal 2 binary64))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(*.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) D)
(*.f64 M D)
(*.f64 D M)
M
D
(*.f64 #s(literal 2 binary64) d)
(/.f64 h l)

localize73.0ms (0.4%)

Memory
-14.5MiB live, 104.3MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy7.504281571958472
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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))))
accuracy11.81915721834161
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy13.981698784505936
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy14.052520418058556
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
48.0ms256×0valid
Compiler

Compiled 310 to 46 computations (85.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 35.0ms
ival-div: 12.0ms (34.7% of total)
ival-pow: 10.0ms (28.9% of total)
ival-mult: 8.0ms (23.1% of total)
ival-pow2: 3.0ms (8.7% 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)

series102.0ms (0.6%)

Memory
-12.2MiB live, 151.5MiB allocated
Counts
6 → 228
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 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) (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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) (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) (*.f64 (*.f64 (/.f64 #s(literal 1 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>) () ())
Outputs
#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 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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/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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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) (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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 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 (* 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (/ (- 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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (/ (- 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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (/ (- 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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* (* 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 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 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)) 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 (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 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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 (* -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 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* -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 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (* (* 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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<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) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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)))) #<representation binary64>) () ())) ())
Calls

15 calls:

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

simplify128.0ms (0.7%)

Memory
31.1MiB live, 180.6MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01473819
14133735
214983698
341763682
479503682
081723598
Stop Event
iter limit
node limit
Counts
228 → 228
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
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)))
(* 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)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -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))))))
(* (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)))
(* 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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) 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
(+ 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)))
(* 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) 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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) 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) 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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) 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))))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -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))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d 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)))
(* 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 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
(+ 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)))
(* (* 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)))))
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)))
(* 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) 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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) 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) 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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) 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 h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) 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)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d 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)))
(* 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 (* (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)))
(* -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)))
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 (* (* 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)))))
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))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 M M)) (*.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))))) 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 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 M M)) (*.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))))) 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 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 M M)) (*.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (*.f64 D D) d) d)) (*.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (*.f64 D D) d) d)) (*.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (*.f64 D D) d) d)) (*.f64 M M) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (*.f64 D D) d) d)) (*.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (*.f64 D D) d) d)) (*.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (/.f64 (*.f64 D D) d) d)) (*.f64 M M) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l 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
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (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
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D 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 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D 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 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D 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 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D 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 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D 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 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D 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 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 d d))) 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 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 d d))) 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 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 d d))) 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 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
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -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))
(* -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))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -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)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -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)))))
(fma.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))

rewrite170.0ms (0.9%)

Memory
16.7MiB live, 240.2MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02272
03868
112467
282867
0873065
Stop Event
iter limit
node limit
iter limit
Counts
6 → 454
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 #s(literal 1 binary64) #s(literal 2 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval103.0ms (0.6%)

Memory
-11.7MiB live, 197.6MiB allocated
Compiler

Compiled 26 376 to 1 506 computations (94.3% saved)

prune85.0ms (0.5%)

Memory
-21.8MiB live, 102.5MiB allocated
Pruning

30 alts after pruning (30 fresh and 0 done)

PrunedKeptTotal
New65430684
Fresh000
Picked101
Done000
Total65530685
Accuracy
88.8%
Counts
685 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
39.0%
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h) (*.f64 (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
38.7%
(fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
62.7%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
62.6%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
35.5%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
35.2%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
33.7%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
32.3%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
52.5%
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
62.7%
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
64.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)))) (fma.f64 (*.f64 (/.f64 (neg.f64 h) l) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #s(literal 1 binary64)))
64.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)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 M (/.f64 h l))) #s(literal 1 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 l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))))
57.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 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) #s(literal 1/2 binary64)) d) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
66.5%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
56.3%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (*.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 2 binary64)) (*.f64 D M)))))
24.5%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))))
34.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) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
64.3%
(*.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))))
35.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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
35.2%
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (pow.f64 h #s(literal -1/2 binary64)))
35.4%
(*.f64 (*.f64 (*.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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
14.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 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
16.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 d d))) d))
1.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 M M)) (*.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
14.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
11.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
24.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) (*.f64 l h))) d))
27.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 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
Compiler

Compiled 1 778 to 1 346 computations (24.3% saved)

simplify129.0ms (0.7%)

Memory
20.2MiB live, 135.4MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (/.f64 (/.f64 d l) h) d)
cost-diff0
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
cost-diff0
(*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
cost-diff8448
(fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
cost-diff0
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
cost-diff0
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
cost-diff0
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
cost-diff0
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
cost-diff0
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d))
cost-diff0
(fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
cost-diff0
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
cost-diff0
(*.f64 l h)
cost-diff0
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
cost-diff0
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
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) (*.f64 l h))) d))
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-diff6848
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
087694
0148684
1273672
2684655
33350655
47890655
08041651
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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #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))))
(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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
D
M
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 D #s(literal 1/2 binary64))
(/.f64 M d)
(pow.f64 h #s(literal -1 binary64))
#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 #s(literal 1 binary64) (*.f64 l h))) d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
#s(literal 1 binary64)
(*.f64 l h)
l
h
d
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d))
(*.f64 (*.f64 M M) #s(literal -1/8 binary64))
(*.f64 M M)
M
#s(literal -1/8 binary64)
(/.f64 (*.f64 D D) d)
(*.f64 D D)
D
d
(sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)))
(pow.f64 (/.f64 h l) #s(literal 3 binary64))
(/.f64 h l)
h
l
#s(literal 3 binary64)
(*.f64 (sqrt.f64 (/.f64 h l)) d)
(sqrt.f64 (/.f64 h l))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
d
D
#s(literal -2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
(fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(*.f64 (/.f64 (/.f64 d l) h) d)
(/.f64 (/.f64 d l) h)
(/.f64 d l)
d
l
h
(*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)
(*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
D
#s(literal -2 binary64)
(pow.f64 l #s(literal -1 binary64))
#s(literal -1 binary64)
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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 D d) M)) l) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64)) (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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 D d) M)) l) (*.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) h) #s(literal 1 binary64))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) h) (*.f64 (*.f64 (/.f64 M d) #s(literal 1/4 binary64)) D))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
(/.f64 (*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d))) l)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(*.f64 D (/.f64 #s(literal 1/2 binary64) d))
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
D
M
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/4 binary64) h) (*.f64 (/.f64 D d) M))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 (*.f64 (/.f64 M d) #s(literal 1/4 binary64)) D)
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/4 binary64) D)
(*.f64 D #s(literal 1/2 binary64))
(/.f64 M d)
(pow.f64 h #s(literal -1 binary64))
#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 #s(literal 1 binary64) (*.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l)) d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l)) d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/.f64 (pow.f64 h #s(literal -1 binary64)) l)
#s(literal 1 binary64)
(*.f64 l h)
l
h
d
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (/.f64 D d)) D (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (/.f64 D d)) D (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (/.f64 D d)) D (*.f64 (sqrt.f64 (/.f64 h l)) d))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) D) d) D)
(*.f64 (*.f64 M M) #s(literal -1/8 binary64))
(*.f64 #s(literal -1/8 binary64) (*.f64 M M))
(*.f64 M M)
M
#s(literal -1/8 binary64)
(/.f64 (*.f64 D D) d)
(*.f64 D D)
D
d
(sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)))
(pow.f64 (/.f64 h l) #s(literal 3 binary64))
(/.f64 h l)
h
l
#s(literal 3 binary64)
(*.f64 (sqrt.f64 (/.f64 h l)) d)
(sqrt.f64 (/.f64 h l))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(*.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d l))) (fma.f64 (pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(fma.f64 (pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
d
D
#s(literal -2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
(fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(*.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 #s(literal -1/2 binary64) h)) (pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)))
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(*.f64 (/.f64 (/.f64 d l) h) d)
(/.f64 (/.f64 d l) h)
(/.f64 d l)
d
l
h
(*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)
(*.f64 (*.f64 #s(literal -1/2 binary64) h) (pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)))
(*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64)) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(*.f64 (/.f64 d M) (/.f64 #s(literal 2 binary64) D))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
D
#s(literal -2 binary64)
(pow.f64 l #s(literal -1 binary64))
#s(literal -1 binary64)

localize248.0ms (1.4%)

Memory
-13.4MiB live, 382.6MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy2.6742539980879845
(/.f64 (/.f64 d l) h)
accuracy3.0454124488718533
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
accuracy5.075210209845508
(*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
accuracy11.088905726887253
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
accuracy1.6525997834700394
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
accuracy3.0454124488718533
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
accuracy4.159631209382965
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
accuracy6.7093465446714164
(sqrt.f64 (/.f64 d l))
accuracy5.940441524921008
(sqrt.f64 (/.f64 h l))
accuracy6.1884160879076315
(fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
accuracy7.432873184095454
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d))
accuracy8.497389116317171
(sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)))
accuracy0.08984375
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
accuracy0.10546875
(/.f64 #s(literal 1 binary64) (*.f64 l h))
accuracy6.1511873075777315
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy29.623033223535383
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
accuracy3.3420693642210115
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
accuracy3.6072095998612554
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
accuracy5.723230176772776
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy6.7093465446714164
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
96.0ms129×0invalid
86.0ms127×0valid
Compiler

Compiled 1 343 to 155 computations (88.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 136.0ms
ival-mult: 54.0ms (39.6% of total)
ival-pow: 32.0ms (23.5% of total)
ival-div: 26.0ms (19.1% of total)
ival-sqrt: 11.0ms (8.1% of total)
ival-pow2: 6.0ms (4.4% of total)
ival-add: 3.0ms (2.2% of total)
ival-sub: 2.0ms (1.5% of total)
ival-neg: 2.0ms (1.5% of total)
exact: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series227.0ms (1.3%)

Memory
22.1MiB live, 330.3MiB allocated
Counts
28 → 1 152
Calls
Call 1
Inputs
#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())
#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 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())
#s(alt (*.f64 l h) (patch (*.f64 l 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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())
Outputs
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 (* 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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 (* -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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor inf h) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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/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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<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 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<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 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<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 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))))) (taylor -inf h) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))))) (taylor -inf h) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))))) (taylor -inf h) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf M) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<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 (* -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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) 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 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ 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 (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<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 (* 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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (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 (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<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 (* (* 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) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<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 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<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 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<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 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (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 (* (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 (* (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 (* (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 (* (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 (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h 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)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf D) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 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 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 (* -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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) 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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) 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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<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 (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 (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 (* 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) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<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 (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 (* -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 (* -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) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<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) (*.f64 l h))) d)) (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) (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (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 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) (patch (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) (patch (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (patch (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (*.f64 (/.f64 (/.f64 d l) h) d) (patch (*.f64 (/.f64 (/.f64 d l) h) d) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<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 (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ d (* D M))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) (patch (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
Calls

15 calls:

TimeVariablePointExpression
23.0ms
D
@0
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (+ (* (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (pow l -1)) (sqrt (* (/ (/ d l) h) d))) (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (sqrt (* (/ (/ d l) h) d)) (* (/ (/ d l) h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (* (* (/ 1/2 d) D) M) (/ 1 (* l h)) (sqrt (pow (/ h l) 3)) (sqrt (/ h l)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (/ (/ d l) h))
19.0ms
h
@inf
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (+ (* (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (pow l -1)) (sqrt (* (/ (/ d l) h) d))) (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (sqrt (* (/ (/ d l) h) d)) (* (/ (/ d l) h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (* (* (/ 1/2 d) D) M) (/ 1 (* l h)) (sqrt (pow (/ h l) 3)) (sqrt (/ h l)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (/ (/ d l) h))
16.0ms
d
@-inf
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (+ (* (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (pow l -1)) (sqrt (* (/ (/ d l) h) d))) (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (sqrt (* (/ (/ d l) h) d)) (* (/ (/ d l) h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (* (* (/ 1/2 d) D) M) (/ 1 (* l h)) (sqrt (pow (/ h l) 3)) (sqrt (/ h l)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (/ (/ d l) h))
12.0ms
d
@0
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (+ (* (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (pow l -1)) (sqrt (* (/ (/ d l) h) d))) (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (sqrt (* (/ (/ d l) h) d)) (* (/ (/ d l) h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (* (* (/ 1/2 d) D) M) (/ 1 (* l h)) (sqrt (pow (/ h l) 3)) (sqrt (/ h l)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (/ (/ d l) h))
12.0ms
M
@0
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (+ (* (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (pow l -1)) (sqrt (* (/ (/ d l) h) d))) (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (sqrt (* (/ (/ d l) h) d)) (* (/ (/ d l) h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (* (* (/ 1/2 d) D) M) (/ 1 (* l h)) (sqrt (pow (/ h l) 3)) (sqrt (/ h l)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (/ (/ d l) h))

simplify231.0ms (1.3%)

Memory
14.0MiB live, 284.3MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
036319915
1109119162
2392319012
0839818604
Stop Event
iter limit
node limit
Counts
1 152 → 1 152
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))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* 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)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* h l)
(* h l)
(* h l)
(* 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)
(* 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)
(* d (sqrt (/ h l)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ 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)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* 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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d 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))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* h l)
(* h l)
(* h l)
(* h l)
(* -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)))))
(* 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 (/ (pow h 3) (pow l 3)))))
(* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* (pow h 2) (+ (* -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)))))
(* 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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* -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)))))
(* 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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* -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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* (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) (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 (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))) (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))
(* h l)
(* h l)
(* h l)
(* h 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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* 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 (/ (pow h 3) (pow l 3)))))
(* (pow h 2) (+ (* -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))))))))
(* (pow h 2) (+ (* -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))))))))
(* (pow h 2) (+ (* -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) (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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -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) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 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))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h 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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(* (sqrt (/ (pow h 3) (pow l 3))) (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)))
(* -1 (* (sqrt (/ h l)) (pow (sqrt -1) 2)))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 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)))))
(* d (sqrt (/ h l)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 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)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 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)))))
(* (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))))))
(* -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 (/ (pow h 3) (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 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)))))
(* (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))))))
(* -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 (/ (pow h 3) (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* h l)
(* h l)
(* h l)
(* h l)
(* -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))
(* -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))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 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))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(* -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/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))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* -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))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ 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)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* h l)
(* h l)
(* h l)
(* 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)))))
(* d (sqrt (/ h l)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ 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)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* 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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h 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 (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 (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))) (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))
(* h l)
(* h l)
(* h l)
(* 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 (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 (pow (sqrt -1) 2)) (sqrt (/ h l)))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 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 (pow (sqrt -1) 3)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 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))))
(* (* 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)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 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))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* 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)))))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(* (sqrt (/ h 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))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 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)))))
(* d (sqrt (/ h l)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 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)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 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)))))
(* (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)))))
(* (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 (/ (pow h 3) (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 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)))))
(* (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)))))
(* (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 (/ (pow h 3) (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ 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))))
(* 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)
(* -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)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) 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)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (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)) 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)) (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)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* 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)
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 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)))))))
(* 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)) (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)))))))
(* 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)))))))
(* d (sqrt (/ h l)))
(* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))
(* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))
(* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) 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)))))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(sqrt (/ d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 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))))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 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 (* (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)))
(* -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)))
(* -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))))
(* 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 (+ (* -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 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* d (sqrt (/ h l)))
(* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -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))))))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 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 (* 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))))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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)))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* -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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -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)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(* 2 (/ d (* D M)))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
Outputs
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ h l)))
(*.f64 (sqrt.f64 (/.f64 h l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(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))
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (*.f64 h h) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))))
(* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (*.f64 h h) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))))
(* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (*.f64 h h) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)))) h)
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(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))
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (neg.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))))) h)
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (neg.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))))) h)
(* -1 (* h (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d (neg.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3)))))
(*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 D D)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))) (/.f64 #s(literal -1/8 binary64) d))
(* (pow h 2) (+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (*.f64 h h))
(* (pow h 2) (+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (*.f64 h h))
(* (pow h 2) (+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) (*.f64 h h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) d) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) l) (/.f64 (/.f64 (*.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) l) (/.f64 (/.f64 (*.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) l) (/.f64 (/.f64 (*.f64 D D) d) d)) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(* -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))
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ h l)))
(*.f64 (sqrt.f64 (/.f64 h l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)))) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)))) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) l)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)))) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)))) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)))) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (*.f64 (sqrt.f64 (*.f64 l h)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)))) (*.f64 l l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(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 (/ 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))
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) 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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ h l)))
(*.f64 (sqrt.f64 (/.f64 h l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(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 (/ 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))
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(* (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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* 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 #s(literal 1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* 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 #s(literal 1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* 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 #s(literal 1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ h l)))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))) #s(literal 1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))) #s(literal 1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))) #s(literal 1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))
(*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (neg.f64 h) M) M) (/.f64 (sqrt.f64 #s(literal -1 binary64)) d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (neg.f64 h) M) M) (/.f64 (sqrt.f64 #s(literal -1 binary64)) d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (neg.f64 h) M) M) (/.f64 (sqrt.f64 #s(literal -1 binary64)) d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 h l)))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 h l)))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 h l)))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 h 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 (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ h l)))
(*.f64 (sqrt.f64 (/.f64 h l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)) #s(literal 1 binary64)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 D D)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 h l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 D D)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 h l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 D D)) (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 h l)))) d)
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 M M) h) l) (*.f64 d d)) (*.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 M M) h) l) (*.f64 d d)) (*.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 M M) h) l) (*.f64 d d)) (*.f64 d d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(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))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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 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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ h l)))
(*.f64 (sqrt.f64 (/.f64 h l)) d)
(* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d))) (sqrt.f64 (/.f64 h l))) d)
(* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d))) (sqrt.f64 (/.f64 h l))) d)
(* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d))) (sqrt.f64 (/.f64 h l))) d)
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(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))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -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))
(* -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))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ h l)))
(*.f64 (sqrt.f64 (/.f64 h l)) d)
(* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d))) (sqrt.f64 (/.f64 h l))) d)
(* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d))) (sqrt.f64 (/.f64 h l))) d)
(* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))
(*.f64 (fma.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (sqrt.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D d))) (sqrt.f64 (/.f64 h l))) d)
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (neg.f64 h) M) M)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* -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))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(* 2 (/ d (* D M)))
(*.f64 (/.f64 d (*.f64 M D)) #s(literal 2 binary64))
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)
(/ d (* h l))
(/.f64 (/.f64 d l) h)

rewrite187.0ms (1%)

Memory
-1.0MiB live, 226.7MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
087433
0148415
1479392
23472384
08194383
Stop Event
iter limit
node limit
iter limit
Counts
28 → 863
Calls
Call 1
Inputs
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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(literal 2 binary64))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(*.f64 l h)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(*.f64 (/.f64 (/.f64 d l) h) 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 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)))
(sqrt.f64 (/.f64 h l))
(sqrt.f64 (/.f64 d l))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(/.f64 (/.f64 d l) h)
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval349.0ms (1.9%)

Memory
26.3MiB live, 557.4MiB allocated
Compiler

Compiled 75 755 to 4 530 computations (94% saved)

prune295.0ms (1.6%)

Memory
26.0MiB live, 629.4MiB allocated
Pruning

57 alts after pruning (56 fresh and 1 done)

PrunedKeptTotal
New2 297502 347
Fresh19625
Picked415
Done000
Total2 320572 377
Accuracy
95.2%
Counts
2 377 → 57
Alt Table
Click to see full alt table
StatusAccuracyProgram
39.1%
(fma.f64 (*.f64 (pow.f64 l #s(literal -1 binary64)) (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))) #s(literal -1/2 binary64))) h (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
26.0%
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
31.6%
(fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))))
39.6%
(fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 d (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
37.0%
(fma.f64 (*.f64 #s(approx (sqrt (* (/ (/ d l) h) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
31.5%
(fma.f64 (*.f64 #s(approx (sqrt (* (/ (/ d l) h) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
38.0%
(fma.f64 #s(approx (* (sqrt (* (/ (/ d l) h) d)) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
28.6%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h)))
38.0%
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
37.2%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 #s(literal -1/2 binary64) (/.f64 h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
32.3%
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
28.3%
(/.f64 (*.f64 (*.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
19.4%
(/.f64 (*.f64 (*.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 M M) h) l) (*.f64 d d)) (*.f64 d d))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
11.2%
(/.f64 (*.f64 (*.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
23.1%
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
4.8%
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
52.5%
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
62.7%
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
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 l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))))
65.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (*.f64 (/.f64 M d) (*.f64 (*.f64 #s(literal 1/4 binary64) D) h)))))
56.3%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (*.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 2 binary64)) (*.f64 D M)))))
24.5%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))))
37.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
35.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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
35.5%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (pow.f64 l #s(literal -1/2 binary64)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
37.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (pow.f64 (neg.f64 l) #s(literal -1 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
66.5%
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
39.1%
(*.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 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
21.3%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))))
20.0%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
14.0%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
27.2%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
59.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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
40.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 (fma.f64 (/.f64 (*.f64 (*.f64 (neg.f64 D) D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (neg.f64 d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
50.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 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
45.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (pow.f64 (/.f64 l h) #s(literal -3/2 binary64)) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
46.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 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) D) (/.f64 D d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
46.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 (fma.f64 M (*.f64 (*.f64 #s(literal -1/8 binary64) M) (*.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 D D) d))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
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 (-.f64 (pow.f64 (*.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 h l)) d) #s(literal 2 binary64))) (*.f64 h (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.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 (*.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 h l)) d) #s(literal 2 binary64))) (pow.f64 h #s(literal -1 binary64))) (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l))))))
34.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
10.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h))
24.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 l h))))
59.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 #s(literal 1 binary64) (/.f64 h (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (sqrt.f64 (/.f64 h l)) d)))))
1.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 M M)) (*.f64 D D)) (/.f64 #s(literal 1/8 binary64) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))))) h))
24.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (pow.f64 (*.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
24.9%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (*.f64 l h) #s(literal -1/2 binary64)) d))
22.1%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
3.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (pow.f64 l #s(literal -1 binary64)))) (sqrt.f64 (neg.f64 h))) d))
24.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 l h))) d))
11.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
16.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 (sqrt.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 h h)) #s(literal -1/2 binary64))) d))
24.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 (pow.f64 h #s(literal -1 binary64)) l)) d))
24.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) (*.f64 l h))) d))
59.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 (neg.f64 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (sqrt.f64 (/.f64 h l)) d))) (/.f64 #s(literal -1 binary64) h)))
23.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
27.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))))
Compiler

Compiled 3 037 to 2 377 computations (21.7% saved)

simplify155.0ms (0.9%)

Memory
-6.2MiB live, 186.3MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 d d)
cost-diff0
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
cost-diff0
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
cost-diff8448
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
cost-diff0
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))
cost-diff0
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
cost-diff0
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
cost-diff320
(fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
cost-diff0
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
cost-diff0
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
cost-diff0
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
cost-diff128
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l))
cost-diff0
(*.f64 l h)
cost-diff0
(sqrt.f64 (*.f64 l h))
cost-diff0
(/.f64 d (sqrt.f64 (*.f64 l h)))
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 l h))))
cost-diff320
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
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-diff6848
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
089690
0153695
1299674
2817647
34935647
08104642
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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
D
M
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 D #s(literal 1/2 binary64))
(/.f64 M d)
(pow.f64 h #s(literal -1 binary64))
#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 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) M)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
d
M
D
(neg.f64 l)
l
(*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (/.f64 M d) h)
(/.f64 M d)
h
(*.f64 #s(literal 1/4 binary64) D)
#s(literal 1/4 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))
#s(literal 1/4 binary64)
(pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))
(/.f64 (/.f64 d D) M)
(/.f64 d D)
d
D
M
#s(literal -2 binary64)
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
(/.f64 (*.f64 d d) (*.f64 l h))
(*.f64 d d)
d
(*.f64 l h)
l
h
(*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)
(*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
D
#s(literal -2 binary64)
(pow.f64 l #s(literal -1 binary64))
#s(literal -1 binary64)
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(*.f64 (/.f64 (/.f64 d l) h) d)
(/.f64 (/.f64 d l) h)
(/.f64 d 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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 D d) M)) l) (*.f64 (*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.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 l)) (sqrt.f64 (/.f64 d h)))
(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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 D d) M)) l) (*.f64 (*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D) h) #s(literal 1 binary64))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) M) (/.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) l)) (*.f64 #s(literal 1/4 binary64) D))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
(*.f64 (*.f64 (/.f64 M l) #s(literal 1/2 binary64)) (/.f64 D d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(*.f64 D (/.f64 #s(literal 1/2 binary64) d))
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
D
M
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 D d) M) (*.f64 #s(literal 1/4 binary64) h))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/4 binary64) D)
(*.f64 D #s(literal 1/2 binary64))
(/.f64 M d)
(pow.f64 h #s(literal -1 binary64))
#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 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 D d) M)) l) (*.f64 (*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 D d) M)) l) (*.f64 (*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 D d) M)) l) (*.f64 (*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 D d) M)) l) (*.f64 (*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D) h) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l))
(*.f64 (*.f64 #s(literal -1/2 binary64) D) (/.f64 (/.f64 M l) d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (*.f64 (/.f64 M d) #s(literal 1/2 binary64)) D)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) M)
(*.f64 (/.f64 M d) #s(literal 1/2 binary64))
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
d
M
D
(neg.f64 l)
l
(*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 (/.f64 D d) M) (*.f64 #s(literal 1/4 binary64) h))
(*.f64 (/.f64 M d) h)
(/.f64 M d)
h
(*.f64 #s(literal 1/4 binary64) D)
#s(literal 1/4 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (neg.f64 d))
(neg.f64 d)
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 h l)) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 h l)) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 h l)) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))
(/.f64 (/.f64 d D) M)
(/.f64 d D)
d
D
M
#s(literal -2 binary64)
(*.f64 #s(literal -1/2 binary64) (/.f64 h l))
(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(/.f64 h l)
h
l
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) h) l) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
(*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal -1/2 binary64)) h) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(/.f64 (*.f64 d d) (*.f64 l h))
(*.f64 (/.f64 (/.f64 d l) h) d)
(*.f64 d d)
d
(*.f64 l h)
l
h
(*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)
(*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal -1/2 binary64)) h)
(*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64))
(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
(*.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64))
(/.f64 #s(literal 2 binary64) M)
#s(literal 2 binary64)
M
(/.f64 d D)
D
#s(literal -2 binary64)
(pow.f64 l #s(literal -1 binary64))
#s(literal -1 binary64)
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(*.f64 (/.f64 (/.f64 d l) h) d)
(/.f64 (/.f64 d l) h)
(/.f64 d l)

localize291.0ms (1.6%)

Memory
-18.7MiB live, 382.6MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy5.075210209845508
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
accuracy5.8677083558706435
(/.f64 (*.f64 d d) (*.f64 l h))
accuracy11.088905726887253
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
accuracy11.088905726887253
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
accuracy2.9863054269814127
(/.f64 (/.f64 d D) M)
accuracy4.159631209382965
(fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
accuracy5.723230176772776
(sqrt.f64 (/.f64 d h))
accuracy6.7093465446714164
(sqrt.f64 (/.f64 d l))
accuracy1.815886204436954
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
accuracy2.92959843800169
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l))
accuracy3.108377536638423
(*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
accuracy6.7093465446714164
(sqrt.f64 (/.f64 d l))
accuracy0
(*.f64 l h)
accuracy0.12109375
(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy6.159089404523278
(sqrt.f64 (*.f64 l h))
accuracy29.623033223535383
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
accuracy3.3420693642210115
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
accuracy3.6072095998612554
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
accuracy5.723230176772776
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy6.7093465446714164
(sqrt.f64 (/.f64 d l))
Samples
116.0ms127×0valid
104.0ms129×0invalid
Compiler

Compiled 1 376 to 162 computations (88.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 180.0ms
ival-mult: 89.0ms (49.6% of total)
ival-pow: 37.0ms (20.6% of total)
ival-div: 27.0ms (15% of total)
ival-sqrt: 14.0ms (7.8% of total)
ival-add: 3.0ms (1.7% of total)
ival-neg: 3.0ms (1.7% of total)
ival-sub: 2.0ms (1.1% of total)
ival-pow2: 2.0ms (1.1% of total)
exact: 1.0ms (0.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series260.0ms (1.4%)

Memory
30.1MiB live, 266.2MiB allocated
Counts
29 → 1 176
Calls
Call 1
Inputs
#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())
#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 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())
#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())
#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())
#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())
Outputs
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 (* 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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 (* -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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<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 (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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/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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) 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 (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) 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 (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf M) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) 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 (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<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 (* -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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<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 (* 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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (*.f64 l h) (patch (*.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<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 (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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #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 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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) 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 (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #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 -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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) 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 (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf D) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 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 (* -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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor 0 d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor 0 d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor 0 d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor 0 d) (#s(alt (*.f64 d d) (patch (*.f64 d 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 (* -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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<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 (/ d (* D M)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 (* 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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor inf d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor inf d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor inf d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor inf d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<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 (* 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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<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 (/ d (* D M)) (taylor inf d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor inf d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 (* -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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<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 l h)))) (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 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (*.f64 l h))) (patch (/.f64 d (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (patch (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (patch (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (patch (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor -inf d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor -inf d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor -inf d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor -inf d) (#s(alt (*.f64 d d) (patch (*.f64 d d) #<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 (* -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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (patch (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<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 (/ d (* D M)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (/ d (* D M)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d D) M) (patch (/.f64 (/.f64 d D) M) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (patch (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (*.f64 d d) (*.f64 l h)) (patch (/.f64 (*.f64 d d) (*.f64 l h)) #<representation binary64>) () ())) ())
Calls

15 calls:

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

simplify220.0ms (1.2%)

Memory
-6.9MiB live, 274.5MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
031219042
192018416
2333318298
3727418223
0814617854
Stop Event
iter limit
node limit
Counts
1 176 → 1 176
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))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* 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)
(* 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))
(* h l)
(* h l)
(* h l)
(* 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)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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)
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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 (/ (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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d 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))))))
(* 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))
(* h l)
(* h l)
(* h l)
(* h l)
(* -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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* -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)))))
(* 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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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)))))
(* 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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* (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) (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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* 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)
(* -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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -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) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 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))))
(* -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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* (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))
(* (* 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))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 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/2 (/ (* D M) (* d l)))
(* -1/2 (/ (* D M) (* d l)))
(* -1/2 (/ (* D M) (* d l)))
(* -1/2 (/ (* D M) (* 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)))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* 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)))
(* 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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(* 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)))))
(* (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/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)))))
(* (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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d 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/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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(* 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)))))
(* (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/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)))))
(* (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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d 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/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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(* -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))))
(* 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))
(* h l)
(* h l)
(* h l)
(* h 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)) 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))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(* -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/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))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 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))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* 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))))
(* 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))
(* h l)
(* h l)
(* h l)
(* h 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)))
(* 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)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ 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)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* 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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* 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)
(* -1/2 (/ (* D M) (* d l)))
(* -1/2 (/ (* D M) (* d l)))
(* -1/2 (/ (* D M) (* d l)))
(* -1/2 (/ (* D M) (* d 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 (pow (sqrt -1) 3)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 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))))
(* (* 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)))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* (* 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)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 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)) (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 (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 (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))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* 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)
(* 1/4 D)
(* 1/4 D)
(* 1/4 D)
(* 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/2 (/ (* D M) (* d l)))
(* -1/2 (/ (* D M) (* d l)))
(* -1/2 (/ (* D M) (* d l)))
(* -1/2 (/ (* D M) (* 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)))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* 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)))
(* 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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(* 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)
(* 1/4 D)
(* 1/4 D)
(* 1/4 D)
(* -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/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)))))
(* (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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d 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/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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(* 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)
(* 1/4 D)
(* 1/4 D)
(* 1/4 D)
(* -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/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)))))
(* (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) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d 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/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 l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d 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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h 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)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (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)) 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)) (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)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (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)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(pow d 2)
(pow d 2)
(pow d 2)
(pow d 2)
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ 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)
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(* 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))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* 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)))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h 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)))
(* 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)))))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(sqrt (/ d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 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))))
(* 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)))))))
(sqrt (/ d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* 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)))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(pow d 2)
(pow d 2)
(pow d 2)
(pow d 2)
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(* 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))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(* 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 (* (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)))
(* -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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h 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 (* 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))))))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 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 (* (* 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 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* 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 (* 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))))))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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)))))
(pow d 2)
(pow d 2)
(pow d 2)
(pow d 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)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -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)))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(/ d (* D M))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
(/ (pow d 2) (* h l))
Outputs
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1 (* h (+ (* -1 (* (/ (* d (sqrt -1)) h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) (/.f64 M d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) l) (/.f64 (/.f64 (*.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) l) (/.f64 (/.f64 (*.f64 D D) d) d)) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) l) (/.f64 (/.f64 (*.f64 D D) d) d)) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) h))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* (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)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt l))) (* (* d (sqrt -1)) (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M) (/.f64 (*.f64 D D) d)) (*.f64 (sqrt.f64 (pow.f64 l #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))) (*.f64 l l))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l)))
(*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 h) (sqrt.f64 #s(literal -1 binary64))) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 h) (sqrt.f64 #s(literal -1 binary64))) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 3)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 h) (sqrt.f64 #s(literal -1 binary64))) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (neg.f64 h) M) M) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (neg.f64 h) M) M) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (neg.f64 h) M) M) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (neg.f64 (sqrt.f64 (/.f64 d l))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (neg.f64 h) M) M) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (neg.f64 h) M) M) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (neg.f64 h) M) M) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64))))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h l))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h l))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(+ (* -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 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* 1/4 D)
(*.f64 D #s(literal 1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (* h (sqrt -1))) d) (sqrt (/ 1 (pow l 3))))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (sqrt (/ 1 (pow l 3))))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) M) M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) l)) (*.f64 d d)) (*.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) l)) (*.f64 d d)) (*.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) l)) (*.f64 d d)) (*.f64 d d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.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))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(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))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) d))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))) d)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.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))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(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))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* -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))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(*.f64 (neg.f64 d) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (sqrt -1)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (sqrt -1)))))
(*.f64 (neg.f64 d) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 5 binary64))) (pow.f64 l #s(literal 3 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) d)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) d) (/.f64 (*.f64 D D) d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h l))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(* -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))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* -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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (/.f64 #s(literal -1/8 binary64) d) (*.f64 (*.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) d)
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* -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))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(/ d (* D M))
(/.f64 d (*.f64 M D))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))
(/ (pow d 2) (* h l))
(*.f64 (/.f64 d l) (/.f64 d h))

rewrite175.0ms (1%)

Memory
4.1MiB live, 231.8MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
089399
0153407
1512344
23776320
08288311
Stop Event
iter limit
node limit
iter limit
Counts
29 → 1 293
Calls
Call 1
Inputs
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 D #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 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d)))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
(*.f64 d d)
(sqrt.f64 (/.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 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(sqrt.f64 (/.f64 d h))
(/.f64 (/.f64 d D) M)
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(/.f64 (*.f64 d d) (*.f64 l h))
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval484.0ms (2.7%)

Memory
16.1MiB live, 647.4MiB allocated
Compiler

Compiled 83 734 to 4 592 computations (94.5% saved)

prune164.0ms (0.9%)

Memory
-16.2MiB live, 398.9MiB allocated
Pruning

51 alts after pruning (49 fresh and 2 done)

PrunedKeptTotal
New2 565302 595
Fresh321951
Picked415
Done011
Total2 601512 652
Accuracy
96.3%
Counts
2 652 → 51
Alt Table
Click to see full alt table
StatusAccuracyProgram
40.7%
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal -1/8 binary64)) h) d) (sqrt.f64 (*.f64 l h))) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
33.6%
(fma.f64 (*.f64 (pow.f64 l #s(literal -1 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal -1/8 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))) h (/.f64 d (sqrt.f64 (*.f64 l h))))
31.6%
(fma.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))))
31.5%
(fma.f64 (*.f64 #s(approx (sqrt (/ (* d d) (* l h))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
38.0%
(fma.f64 #s(approx (* (sqrt (/ (* d d) (* l h))) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
42.8%
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
36.1%
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d (neg.f64 l))) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
36.9%
(/.f64 (*.f64 (*.f64 (fma.f64 #s(approx (/ (* (* (/ 1/2 d) M) D) (neg l)) (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) M) l) (/.f64 D d))) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
19.4%
(/.f64 (*.f64 (*.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 (*.f64 M M) h) l) (*.f64 d d)) (*.f64 d d))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
23.1%
(/.f64 (*.f64 #s(approx (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
4.8%
(/.f64 (*.f64 #s(approx (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
35.4%
(*.f64 (fma.f64 (*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal -1/8 binary64)) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
52.5%
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
68.0%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
52.0%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 M D)) (*.f64 d (*.f64 #s(literal 2 binary64) d))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
65.1%
(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (neg.f64 D) l) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 M d))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
62.5%
(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 D d) M) (*.f64 (*.f64 (/.f64 D d) M) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
68.0%
(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64)) (neg.f64 l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
34.1%
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h)))
35.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) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
35.5%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (pow.f64 l #s(literal -1/2 binary64)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
37.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) l) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
37.6%
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
39.1%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
47.4%
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
24.2%
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
7.8%
(*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 d #s(literal 3 binary64))) (pow.f64 l #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 d h)))
36.7%
(*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
8.7%
(*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
14.6%
#s(approx (/ (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
27.2%
#s(approx (/ (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
21.3%
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #s(literal -1/8 binary64) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))))
59.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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
40.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 (fma.f64 (/.f64 (*.f64 (*.f64 (neg.f64 D) D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (neg.f64 d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
45.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (pow.f64 (/.f64 l h) #s(literal -3/2 binary64)) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
46.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 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) D) (/.f64 D d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
46.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 (fma.f64 M (*.f64 (*.f64 #s(literal -1/8 binary64) M) (*.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 D D) d))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
21.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
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 (-.f64 (pow.f64 (*.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 h l)) d) #s(literal 2 binary64))) (*.f64 h (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.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 (*.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 h l)) d) #s(literal 2 binary64))) (pow.f64 h #s(literal -1 binary64))) (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l))))))
34.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
10.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h))
22.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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
24.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 l h))))
24.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 l h)) d)))
3.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (pow.f64 l #s(literal -1 binary64)))) (sqrt.f64 (neg.f64 h))) d))
24.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 l h))) d))
11.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
24.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 (pow.f64 h #s(literal -1 binary64)) l)) d))
24.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) (*.f64 l h))) d))
27.7%
#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 (/.f64 d l) h) d)))
Compiler

Compiled 2 526 to 2 004 computations (20.7% saved)

simplify190.0ms (1.1%)

Memory
-7.8MiB live, 186.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
cost-diff128
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
cost-diff320
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
cost-diff6848
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
cost-diff0
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
cost-diff0
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d))
cost-diff0
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
cost-diff0
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
cost-diff0
#s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)))
cost-diff0
(*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l)))
cost-diff0
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
cost-diff0
(sqrt.f64 (*.f64 l h))
cost-diff0
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
cost-diff320
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)
cost-diff0
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64))
cost-diff0
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
cost-diff0
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
cost-diff128
(neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64)))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
093721
0147704
1301686
2881681
33224681
46524681
08147676
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) M)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
d
M
D
l
(neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))
(*.f64 (*.f64 h (/.f64 M d)) D)
(*.f64 h (/.f64 M d))
h
(/.f64 M d)
#s(literal 1/4 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (/.f64 d h))
(/.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
#s(literal 1 binary64)
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
d
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l)))
#s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)
(*.f64 #s(literal -1/8 binary64) (*.f64 D D))
#s(literal -1/8 binary64)
(*.f64 D D)
D
l
(*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)
(/.f64 (/.f64 (*.f64 M M) d) d)
(/.f64 (*.f64 M M) d)
(*.f64 M M)
M
d
h
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (/.f64 d h))
(/.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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
#s(literal 1/8 binary64)
(*.f64 D D)
D
(/.f64 (*.f64 M M) d)
(*.f64 M M)
M
d
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(/.f64 h (pow.f64 l #s(literal 3 binary64)))
h
(pow.f64 l #s(literal 3 binary64))
l
#s(literal 3 binary64)
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l)))
(/.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
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
#s(literal 1 binary64)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
D
M
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 D #s(literal 1/2 binary64))
(/.f64 M d)
(pow.f64 h #s(literal -1 binary64))
#s(literal -1 binary64)
Outputs
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 M d) h) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 M d) h) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 M d) h) D)) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
(/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) M)
(*.f64 M (/.f64 #s(literal 1/2 binary64) d))
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
d
M
D
l
(neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64)))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 M d) h) D))
(*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 M d) h) D))
(*.f64 (*.f64 h (/.f64 M d)) D)
(*.f64 (*.f64 (/.f64 M d) h) D)
(*.f64 h (/.f64 M d))
(*.f64 (/.f64 M d) h)
h
(/.f64 M d)
#s(literal 1/4 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (/.f64 d h))
(/.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)
(/.f64 d (sqrt.f64 (*.f64 h l)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 h l)))
#s(literal 1 binary64)
(sqrt.f64 (*.f64 l h))
(sqrt.f64 (*.f64 h l))
(*.f64 l h)
(*.f64 h l)
l
h
d
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l) d) (*.f64 (*.f64 (/.f64 M d) M) h))))
(*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l) d) (*.f64 (*.f64 (/.f64 M d) M) h))) (sqrt.f64 (/.f64 d l)))
#s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)))
#s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l) d) (*.f64 (*.f64 (/.f64 M d) M) h)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l) d) (*.f64 (*.f64 (/.f64 M d) M) h))
(/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)
(/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l)
(*.f64 #s(literal -1/8 binary64) (*.f64 D D))
(*.f64 (*.f64 D D) #s(literal -1/8 binary64))
#s(literal -1/8 binary64)
(*.f64 D D)
D
l
(*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)
(*.f64 (/.f64 (*.f64 (/.f64 M d) M) d) h)
(/.f64 (/.f64 (*.f64 M M) d) d)
(/.f64 (*.f64 (/.f64 M d) M) d)
(/.f64 (*.f64 M M) d)
(*.f64 (/.f64 M d) M)
(*.f64 M M)
M
d
h
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (/.f64 d h))
(/.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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 D D))) (*.f64 (/.f64 M d) M)))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 D D))) (*.f64 (/.f64 M d) M))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d))
(*.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) D) d) (*.f64 (*.f64 M M) D))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
#s(literal 1/8 binary64)
(*.f64 D D)
D
(/.f64 (*.f64 M M) d)
(*.f64 (/.f64 M d) M)
(*.f64 M M)
M
d
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(/.f64 h (pow.f64 l #s(literal 3 binary64)))
h
(pow.f64 l #s(literal 3 binary64))
l
#s(literal 3 binary64)
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 M d) h) D)) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 h))))
(*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 d)))
(/.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
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
(fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 M d) h) D)) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 M d) h) D)) l) (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
(/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) D)
(*.f64 D (/.f64 #s(literal 1/2 binary64) d))
(/.f64 #s(literal 1/2 binary64) d)
#s(literal 1/2 binary64)
D
M
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 M d) h) D))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) d) M)
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/4 binary64) D)
(*.f64 D #s(literal 1/2 binary64))
(/.f64 M d)
(pow.f64 h #s(literal -1 binary64))
#s(literal -1 binary64)

localize655.0ms (3.6%)

Memory
-42.0MiB live, 441.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy2.92959843800169
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
accuracy3.3420693642210115
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
accuracy3.6072095998612554
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
accuracy6.7093465446714164
(sqrt.f64 (/.f64 d l))
accuracy6.881535600065414
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d))
accuracy7.513525127186858
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
accuracy9.999847539798003
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
accuracy15.456891617529998
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
accuracy5.723230176772776
(sqrt.f64 (/.f64 d h))
accuracy6.7093465446714164
(sqrt.f64 (/.f64 d l))
accuracy7.517358173739388
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
accuracy16.01405027772306
#s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)))
accuracy0.08984375
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)
accuracy0.1484375
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
accuracy6.159089404523278
(sqrt.f64 (*.f64 l h))
accuracy29.623033223535383
#s(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 l h))) d))
accuracy2.92959843800169
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
accuracy3.1092578588410986
(*.f64 (*.f64 h (/.f64 M d)) D)
accuracy5.723230176772776
(sqrt.f64 (/.f64 d h))
accuracy6.7093465446714164
(sqrt.f64 (/.f64 d l))
Samples
186.0ms127×0valid
107.0ms129×0invalid
Compiler

Compiled 1 268 to 159 computations (87.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 255.0ms
ival-mult: 97.0ms (38% of total)
ival-pow: 51.0ms (20% of total)
ival-div: 49.0ms (19.2% of total)
ival-sqrt: 40.0ms (15.7% of total)
ival-neg: 6.0ms (2.4% of total)
ival-sub: 5.0ms (2% of total)
ival-pow2: 3.0ms (1.2% of total)
ival-add: 2.0ms (0.8% of total)
exact: 1.0ms (0.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series238.0ms (1.3%)

Memory
51.1MiB live, 427.4MiB allocated
Counts
27 → 1 212
Calls
Call 1
Inputs
#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) 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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<representation binary64>) () ())
#s(alt (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())
Outputs
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) 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 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) 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 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) 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 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) 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 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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 (/ (* D (* M h)) d) (taylor 0 h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) 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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) 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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) 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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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 (/ (* D (* M h)) d) (taylor inf h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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 (/ (* D (* M h)) d) (taylor -inf h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf h) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf M) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) 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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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 (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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 (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (*.f64 l h)) (patch (sqrt.f64 (*.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor inf D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor inf D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor inf D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor inf D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (patch (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf D) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) 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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 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 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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 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 (/ (* D (* M h)) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) 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 #s(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 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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 (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 (/ (* D (* M h)) d) (taylor inf d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor inf d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) (patch (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (patch #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) (patch (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<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/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (patch (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<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 (* -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 (/ (* D (* M h)) d) (taylor -inf d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D (* M h)) d) (taylor -inf d) (#s(alt (*.f64 (*.f64 h (/.f64 M d)) D) (patch (*.f64 (*.f64 h (/.f64 M d)) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
Calls

15 calls:

TimeVariablePointExpression
21.0ms
l
@-inf
((neg (* (* (* h (/ M d)) D) 1/4)) (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (* (/ (* -1/8 (* D D)) l) (* (/ (/ (* M M) d) d) h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (* 1/2 (* D 1/2)) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (sqrt (/ d l))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (sqrt (/ d l)) (sqrt (/ d h)) (* (* h (/ M d)) D) (/ (* (* (/ 1/2 d) M) D) l) (sqrt (/ h (pow l 3))) (* (* (/ 1/2 d) D) M) (/ (* (* (/ 1/2 d) D) M) l))
10.0ms
l
@0
((neg (* (* (* h (/ M d)) D) 1/4)) (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (* (/ (* -1/8 (* D D)) l) (* (/ (/ (* M M) d) d) h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (* 1/2 (* D 1/2)) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (sqrt (/ d l))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (sqrt (/ d l)) (sqrt (/ d h)) (* (* h (/ M d)) D) (/ (* (* (/ 1/2 d) M) D) l) (sqrt (/ h (pow l 3))) (* (* (/ 1/2 d) D) M) (/ (* (* (/ 1/2 d) D) M) l))
10.0ms
M
@inf
((neg (* (* (* h (/ M d)) D) 1/4)) (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (* (/ (* -1/8 (* D D)) l) (* (/ (/ (* M M) d) d) h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (* 1/2 (* D 1/2)) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (sqrt (/ d l))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (sqrt (/ d l)) (sqrt (/ d h)) (* (* h (/ M d)) D) (/ (* (* (/ 1/2 d) M) D) l) (sqrt (/ h (pow l 3))) (* (* (/ 1/2 d) D) M) (/ (* (* (/ 1/2 d) D) M) l))
10.0ms
h
@-inf
((neg (* (* (* h (/ M d)) D) 1/4)) (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (* (/ (* -1/8 (* D D)) l) (* (/ (/ (* M M) d) d) h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (* 1/2 (* D 1/2)) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (sqrt (/ d l))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (sqrt (/ d l)) (sqrt (/ d h)) (* (* h (/ M d)) D) (/ (* (* (/ 1/2 d) M) D) l) (sqrt (/ h (pow l 3))) (* (* (/ 1/2 d) D) M) (/ (* (* (/ 1/2 d) D) M) l))
8.0ms
d
@inf
((neg (* (* (* h (/ M d)) D) 1/4)) (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (* (/ (* -1/8 (* D D)) l) (* (/ (/ (* M M) d) d) h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (* 1/2 (* D 1/2)) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (sqrt (/ d l))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (sqrt (/ d l)) (sqrt (/ d h)) (* (* h (/ M d)) D) (/ (* (* (/ 1/2 d) M) D) l) (sqrt (/ h (pow l 3))) (* (* (/ 1/2 d) D) M) (/ (* (* (/ 1/2 d) D) M) l))

simplify239.0ms (1.3%)

Memory
-46.3MiB live, 369.3MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
025119691
171919215
2257419149
3627019113
0817018669
Stop Event
iter limit
node limit
Counts
1 212 → 1 212
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))
(* 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)
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 (/ (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)
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* 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)
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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))))
(/ (+ (* -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)))))
(* 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 (pow l 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* 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
(+ 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))))
(* 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)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* -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)))))
(* 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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* -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)))
(* 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)))))
(* 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))))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* -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)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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 (pow l 3)))))
(* 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) 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)) 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))))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* -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) (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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* 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) (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)))))))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* 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)))
(* -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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(* -1 (* 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)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) 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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* 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) 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) (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)))))))))
(* (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))
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (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))
(* 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 l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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))))
(+ (* -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)))))
(* 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 (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))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) 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
(+ 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))))
(* 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 (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/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)))))
(* (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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -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))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 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)) 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)))))
(* 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 (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))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) 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) 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)) 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 (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/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)))))
(* (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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* -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))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 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)) 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)))))
(* 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 (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))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) 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) 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)) 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 (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/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))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(* -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)
(* 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)) 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))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* -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))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(* -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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -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))
(* 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 (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 (pow l 3)))))
(* -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/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))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ 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)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* 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)))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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))))) (* 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 (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* 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 l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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))))
(+ (* -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)))))
(* 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 (pow l 3)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 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))))
(* 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 l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ 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)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d 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)))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 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))))
(* 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))))
(+ (* -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)))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* 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)))
(* (* 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)))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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 (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)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 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))))
(* (* 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)))))
(* (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/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* 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 h)) d))
(* -1/4 (/ (* D (* M h)) d))
(* -1/4 (/ (* D (* M h)) d))
(* -1/4 (/ (* D (* M h)) d))
(* 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 l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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))))
(* 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 l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 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)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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))))
(+ (* -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)))))
(* 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 (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))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (pow D 2))
(* 1/8 (pow D 2))
(* 1/8 (pow D 2))
(* 1/8 (pow D 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)
(* 1/4 D)
(* 1/4 D)
(* 1/4 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))))
(* 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 (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/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)))))
(* (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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (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)) 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)) d) (sqrt (/ 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 (pow l 3)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (pow D 2))
(* 1/8 (pow D 2))
(* 1/8 (pow D 2))
(* 1/8 (pow D 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)
(* 1/4 D)
(* 1/4 D)
(* 1/4 D)
(* -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)) 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 (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/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)))))
(* (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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* -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) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (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)) 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)) d) (sqrt (/ 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 (pow l 3)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (pow D 2))
(* 1/8 (pow D 2))
(* 1/8 (pow D 2))
(* 1/8 (pow D 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)
(* 1/4 D)
(* 1/4 D)
(* 1/4 D)
(* -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)) 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 (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/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)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (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)) 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)) (pow d 2))
(* 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)
(* -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)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (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)) 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)) (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)) 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)
(* 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 (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 (pow l 3)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) 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) 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/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)
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/4 (/ (* D (* M h)) d))
(* -1/4 (/ (* D (* M h)) d))
(* -1/4 (/ (* D (* M h)) d))
(* -1/4 (/ (* D (* M h)) 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)))))))
(sqrt (/ d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 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))))
(* 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)) (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)))))))
(* 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)))))))
(sqrt (/ d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 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)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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))) (* -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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 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 (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))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) 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
(+ 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))))
(* 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)))))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/4 (/ (* D (* M h)) d))
(* -1/4 (/ (* D (* M h)) d))
(* -1/4 (/ (* D (* M h)) d))
(* -1/4 (/ (* D (* M h)) d))
(* -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 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 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))))
(* 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 (+ (* -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 (* (* 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 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -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 (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 (pow l 3)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) 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
(+ 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 (* 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))))))))
(* -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)))
(* -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)))
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* D (* M h)) d)
(/ (* 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))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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)))
Outputs
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) 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))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) 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 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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)))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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)))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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)))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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)))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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)))))))))
(*.f64 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) 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 (neg.f64 h) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 3 binary64)) h))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* (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)))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l 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/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 h (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (*.f64 D D))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 h (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (*.f64 D D))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 h (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (*.f64 D D))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d l))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 h (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (*.f64 D D))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 h (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (*.f64 D D))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 (*.f64 h (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (*.f64 D D))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d l))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(+ (* -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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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)))))
(neg.f64 (fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(* (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/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/8 (pow D 2))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* 1/4 D)
(*.f64 #s(literal 1/4 binary64) D)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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 (*.f64 (*.f64 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.f64 d d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) 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 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))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) 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 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))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 h M) D) d) #s(literal -1/4 binary64))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -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 (fma.f64 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/8 (/ (* (pow D 2) (pow M 2)) d))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 h M) D) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h) #s(literal 1 binary64))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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 (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* -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))
(* -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))
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(/ (* D (* M h)) d)
(/.f64 (*.f64 (*.f64 h M) D) d)
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) M) l) (/.f64 D d))

rewrite235.0ms (1.3%)

Memory
20.4MiB live, 284.0MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
093490
0147469
1499432
23663394
08710384
Stop Event
iter limit
node limit
iter limit
Counts
27 → 1 002
Calls
Call 1
Inputs
(neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (*.f64 l h))
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l)))
#s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h)))
(*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M 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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d))
(*.f64 #s(literal 1/8 binary64) (*.f64 D D))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
(sqrt.f64 (/.f64 d l))
(sqrt.f64 (/.f64 d h))
(*.f64 (*.f64 h (/.f64 M d)) D)
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval351.0ms (1.9%)

Memory
-3.6MiB live, 633.8MiB allocated
Compiler

Compiled 71 461 to 3 893 computations (94.6% saved)

prune454.0ms (2.5%)

Memory
-6.9MiB live, 465.0MiB allocated
Pruning

53 alts after pruning (49 fresh and 4 done)

PrunedKeptTotal
New2 375262 401
Fresh212344
Picked325
Done022
Total2 399532 452
Accuracy
96.3%
Counts
2 452 → 53
Alt Table
Click to see full alt table
StatusAccuracyProgram
31.5%
(fma.f64 (*.f64 #s(approx (sqrt (/ (* d d) (* l h))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) h)) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
38.0%
(fma.f64 #s(approx (* (sqrt (/ (* d d) (* l h))) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) h)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h l)))) (pow.f64 l #s(literal -1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
42.8%
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
36.1%
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d (neg.f64 l))) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
4.8%
(/.f64 (*.f64 #s(approx (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
35.4%
(*.f64 (fma.f64 (*.f64 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal -1/8 binary64)) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
52.5%
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
20.4%
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (*.f64 (*.f64 (pow.f64 (/.f64 M d) #s(literal 2 binary64)) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))))
68.0%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 D #s(literal -1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
39.5%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h)))
37.4%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))
39.8%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))
68.1%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))))
64.1%
(*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) M) D) (*.f64 d l)) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
64.2%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (*.f64 (/.f64 D l) (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 (/.f64 M d) h)))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
65.3%
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 (/.f64 M l) (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 (/.f64 M d) h)))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
65.3%
(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 (/.f64 M d) h))) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
37.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 (/.f64 M d) h))) #s(literal 1 binary64)))
36.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 (pow.f64 (/.f64 (/.f64 d D) M) #s(literal -2 binary64)) #s(literal -1/8 binary64)) (neg.f64 l)) h)))
36.4%
(*.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 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) h) d))))
39.1%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
47.4%
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
26.5%
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l) (*.f64 (*.f64 (/.f64 M d) M) h)) d)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
25.1%
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) M) h) (*.f64 (*.f64 D D) #s(literal -1/8 binary64))) (*.f64 d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
11.9%
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h)))
15.5%
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))
15.1%
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))
24.2%
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
36.7%
(*.f64 #s(approx (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
8.7%
(*.f64 #s(approx (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
14.6%
#s(approx (/ (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
27.2%
#s(approx (/ (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
59.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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
40.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 (fma.f64 (/.f64 (*.f64 (*.f64 (neg.f64 D) D) (*.f64 #s(literal -1/8 binary64) (*.f64 M M))) (neg.f64 d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
45.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) d)) (pow.f64 (/.f64 l h) #s(literal -3/2 binary64)) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
46.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 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) D) (/.f64 D d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
46.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 (fma.f64 M (*.f64 (*.f64 #s(literal -1/8 binary64) M) (*.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 D D) d))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
21.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
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 (*.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 h l)) d) #s(literal 2 binary64))) (pow.f64 h #s(literal -1 binary64))) (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 M D) #s(literal 2 binary64))) d) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l))))))
17.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 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
16.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 d) (sqrt.f64 (*.f64 (/.f64 h d) l))))
34.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
10.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h))
22.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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
24.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 l h))))
24.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 l h)) d)))
24.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 l h))) d))
12.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 (/.f64 M d) M) (*.f64 #s(literal 1/8 binary64) (*.f64 D D))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
15.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l))))
24.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) (*.f64 l h))) d))
20.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 d l) (neg.f64 h)))))
27.7%
#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 (/.f64 d l) h) d)))
27.2%
#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 h) (/.f64 d l))))
Compiler

Compiled 4 878 to 1 641 computations (66.4% saved)

regimes314.0ms (1.7%)

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

7 calls:

60.0ms
h
46.0ms
d
43.0ms
M
43.0ms
(*.f64 M D)
39.0ms
l
Results
AccuracySegmentsBranch
82.7%2d
82.7%2h
84.8%3l
68.1%1M
71.5%3D
71.9%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
71.5%3(*.f64 M D)
Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes124.0ms (0.7%)

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

2 calls:

52.0ms
d
31.0ms
l
Results
AccuracySegmentsBranch
82.7%2d
82.7%2l
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes66.0ms (0.4%)

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

3 calls:

24.0ms
l
20.0ms
h
17.0ms
d
Results
AccuracySegmentsBranch
79.4%2h
79.4%2d
79.4%2l
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes62.0ms (0.3%)

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

3 calls:

22.0ms
h
20.0ms
l
17.0ms
d
Results
AccuracySegmentsBranch
77.0%2h
77.0%2d
77.0%2l
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes70.0ms (0.4%)

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

3 calls:

36.0ms
d
15.0ms
h
15.0ms
l
Results
AccuracySegmentsBranch
75.9%2d
75.9%2l
75.9%2h
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes80.0ms (0.4%)

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

4 calls:

27.0ms
d
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))))
18.0ms
h
14.0ms
l
Results
AccuracySegmentsBranch
68.0%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))))
68.0%1h
72.7%3l
69.9%2d
Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes33.0ms (0.2%)

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

1 calls:

31.0ms
l
Results
AccuracySegmentsBranch
70.4%2l
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes127.0ms (0.7%)

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

7 calls:

43.0ms
D
24.0ms
d
13.0ms
h
13.0ms
(*.f64 M D)
11.0ms
M
Results
AccuracySegmentsBranch
65.3%1h
65.3%1(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
65.3%1M
67.1%2d
65.3%1(*.f64 M D)
67.2%2D
67.7%2l
Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes130.0ms (0.7%)

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

7 calls:

44.0ms
M
29.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))))
11.0ms
d
11.0ms
l
10.0ms
D
Results
AccuracySegmentsBranch
64.1%1h
64.1%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))))
64.1%1(*.f64 M D)
64.1%1M
66.3%2d
64.1%1D
66.5%2l
Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes123.0ms (0.7%)

Memory
20.6MiB live, 175.1MiB 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 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
#s(approx (/ (* (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (sqrt (neg d))) (sqrt (neg h))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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)))) (sqrt.f64 (*.f64 (/.f64 d h) (/.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)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h l)) 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 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 d) (sqrt.f64 (*.f64 (/.f64 h d) l))))
(*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 #s(approx (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
(*.f64 #s(approx (* (+ (* (/ (* (* (/ 1/2 d) M) D) l) (neg (* (* (* h (/ M d)) D) 1/4))) 1) (sqrt (/ d l))) (neg.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 (neg.f64 d)) (sqrt.f64 (/.f64 (/.f64 d l) (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))))
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 #s(approx (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
(/.f64 (*.f64 #s(approx (* (+ (* (/ (* (* (/ 1/2 d) M) D) (neg l)) (* (* (/ M d) h) (* 1/4 D))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l))))
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) M) h) (*.f64 (*.f64 D D) #s(literal -1/8 binary64))) (*.f64 d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l) (*.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l) (*.f64 (*.f64 (/.f64 M d) M) h)) d)) (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 (pow.f64 (*.f64 l h) #s(literal -1/2 binary64)) d))
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) #s(literal -1/8 binary64)) d) (/.f64 (*.f64 D D) d) l) l)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
Outputs
(*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l) (*.f64 (*.f64 (/.f64 M d) M) h)) d)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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

7 calls:

52.0ms
D
16.0ms
M
14.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))))
11.0ms
d
9.0ms
h
Results
AccuracySegmentsBranch
61.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))))
53.9%4h
51.1%3D
52.3%2(*.f64 M D)
54.5%2M
54.5%3d
55.2%3l
Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes9.0ms (0.1%)

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

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
60.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))))
Compiler

Compiled 35 to 22 computations (37.1% saved)

regimes74.0ms (0.4%)

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

7 calls:

17.0ms
M
10.0ms
D
10.0ms
(*.f64 M D)
8.0ms
l
8.0ms
h
Results
AccuracySegmentsBranch
40.0%2D
48.7%4h
43.2%2(*.f64 M D)
49.3%3d
51.8%5l
42.9%2M
49.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))))
Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes26.0ms (0.1%)

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

3 calls:

10.0ms
d
8.0ms
l
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
48.0%3l
45.2%2d
45.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 37 to 32 computations (13.5% saved)

regimes51.0ms (0.3%)

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

1 calls:

49.0ms
l
Results
AccuracySegmentsBranch
47.7%3l
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes5.0ms (0%)

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

1 calls:

4.0ms
l
Results
AccuracySegmentsBranch
45.8%2l
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes9.0ms (0.1%)

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

3 calls:

3.0ms
h
3.0ms
l
3.0ms
d
Results
AccuracySegmentsBranch
43.2%2d
43.0%2h
44.1%2l
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes18.0ms (0.1%)

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

7 calls:

5.0ms
(*.f64 M D)
2.0ms
M
2.0ms
D
2.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))))
2.0ms
h
Results
AccuracySegmentsBranch
24.9%1D
24.9%1M
24.9%1h
24.9%1(*.f64 M D)
24.9%1d
24.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))))
24.9%1l
Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes16.0ms (0.1%)

Memory
11.7MiB live, 44.3MiB 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 l h))))
Outputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
Calls

7 calls:

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

Compiled 43 to 53 computations (-23.3% saved)

bsearch161.0ms (0.9%)

Memory
-14.6MiB live, 409.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
62.0ms
1.0022381142302075e-75
1.2520085577999809e-66
79.0ms
-3.550553222761154e-301
2.8280987230707103e-305
Samples
57.0ms300×0invalid
56.0ms304×0valid
Compiler

Compiled 1 380 to 1 076 computations (22% saved)

Precisions
Click to see histograms. Total time spent on operations: 81.0ms
ival-div: 27.0ms (33.2% of total)
ival-pow: 23.0ms (28.3% of total)
ival-mult: 21.0ms (25.8% of total)
ival-pow2: 6.0ms (7.4% of total)
ival-sub: 3.0ms (3.7% of total)
exact: 1.0ms (1.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory
14.2MiB live, 14.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
2.0ms
-3.550553222761154e-301
2.8280987230707103e-305
Compiler

Compiled 728 to 570 computations (21.7% saved)

bsearch3.0ms (0%)

Memory
9.6MiB live, 9.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
2.0ms
-3.550553222761154e-301
2.8280987230707103e-305
Compiler

Compiled 698 to 570 computations (18.3% saved)

bsearch81.0ms (0.4%)

Memory
-50.0MiB live, 147.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
72.0ms
-2.5406925153752237e-287
3.6907191376049752e-301
Samples
31.0ms163×0invalid
29.0ms176×0valid
Compiler

Compiled 753 to 613 computations (18.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 46.0ms
ival-div: 19.0ms (40.9% of total)
ival-mult: 11.0ms (23.7% of total)
ival-pow: 10.0ms (21.6% of total)
ival-pow2: 3.0ms (6.5% of total)
ival-sub: 2.0ms (4.3% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch35.0ms (0.2%)

Memory
22.1MiB live, 60.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
31.0ms
-4.6768527279481984e-303
-2.0952180569140258e-303
Samples
13.0ms80×0valid
10.0ms86×0invalid
Compiler

Compiled 368 to 300 computations (18.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 17.0ms
ival-div: 6.0ms (35.1% of total)
ival-mult: 5.0ms (29.2% of total)
ival-pow: 4.0ms (23.4% of total)
ival-pow2: 2.0ms (11.7% of total)
ival-sub: 1.0ms (5.8% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch162.0ms (0.9%)

Memory
-9.2MiB live, 225.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
81.0ms
6.528107681740555e+215
8.408296794540279e+222
68.0ms
-1.1800954440105565e-123
-9.103567030429863e-132
Samples
55.0ms347×0invalid
51.0ms288×0valid
Compiler

Compiled 956 to 813 computations (15% saved)

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

bsearch2.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
6.528107681740555e+215
8.408296794540279e+222
Compiler

Compiled 380 to 345 computations (9.2% saved)

bsearch55.0ms (0.3%)

Memory
-0.7MiB live, 72.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
51.0ms
1.6167291579842502e+214
9.477296456518646e+214
Samples
27.0ms96×0valid
17.0ms97×0invalid
Compiler

Compiled 266 to 240 computations (9.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-mult: 9.0ms (36% of total)
ival-div: 7.0ms (28% of total)
ival-pow: 6.0ms (24% of total)
ival-pow2: 2.0ms (8% of total)
ival-sub: 1.0ms (4% 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
7.2MiB live, 7.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
6.528107681740555e+215
8.408296794540279e+222
Compiler

Compiled 389 to 354 computations (9% saved)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
2.8616600041127973e+296
+inf
0.0ms
-2871312584017102.0
-1.1085216321051625e-55
Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory
1.8MiB live, 1.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
2.8616600041127973e+296
+inf
0.0ms
-2871312584017102.0
-1.1085216321051625e-55
Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
2.8616600041127973e+296
+inf
0.0ms
-5.263128657562613e+25
-3054902635193058300.0
Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch73.0ms (0.4%)

Memory
-7.9MiB live, 114.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
35.0ms
6.712363007849217e-263
2.640014820487073e-262
31.0ms
-1.5687096815983313e-291
-6.8833582118611215e-292
Samples
30.0ms177×0invalid
25.0ms160×0valid
Compiler

Compiled 253 to 290 computations (-14.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-mult: 13.0ms (30.3% of total)
ival-div: 12.0ms (28% of total)
ival-pow: 11.0ms (25.7% of total)
ival-pow2: 4.0ms (9.3% of total)
ival-sub: 2.0ms (4.7% 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
4.4MiB live, 4.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
6.712363007849217e-263
2.640014820487073e-262
1.0ms
-1.5687096815983313e-291
-6.8833582118611215e-292
Compiler

Compiled 238 to 280 computations (-17.6% saved)

bsearch64.0ms (0.4%)

Memory
-20.3MiB live, 55.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
51.0ms
6.152802670362023e-250
6.6315555797297746e-248
Samples
27.0ms80×0invalid
17.0ms112×0valid
Compiler

Compiled 164 to 198 computations (-20.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 21.0ms
ival-div: 7.0ms (32.7% of total)
ival-mult: 6.0ms (28% of total)
ival-pow: 6.0ms (28% of total)
ival-pow2: 2.0ms (9.3% of total)
ival-sub: 1.0ms (4.7% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch60.0ms (0.3%)

Memory
7.1MiB live, 91.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
55.0ms
-3.192911124423022e-275
-1.0508469555274049e-278
Samples
26.0ms103×0invalid
20.0ms128×0valid
Compiler

Compiled 190 to 230 computations (-21.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 38.0ms
ival-pow2: 13.0ms (33.9% of total)
ival-div: 8.0ms (20.9% of total)
ival-mult: 8.0ms (20.9% of total)
ival-pow: 7.0ms (18.3% of total)
ival-sub: 1.0ms (2.6% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

simplify55.0ms (0.3%)

Memory
-16.2MiB live, 106.2MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02451821
13421821
24121821
34881821
45591821
56081821
66301821
76371821
86391821
Stop Event
saturated
Calls
Call 1
Inputs
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 827545865385885/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 (/.f64 M d) h))) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 d #s(literal -3242833953440493/1544206644495472857303583883048380333324864576447617480139933456630175320190394187102969236003396030389305708803686614314192266367994640173851115417028339461681498903477221384921775113999124270181577817371160469578262386195561925496048762173836971712805252506350393444460551564142078418977251644200485277277433072975872 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d (neg.f64 l))) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 l #s(literal -690694488213835/47634102635436893179040485073748265163400240214004076398607741693502376385799646303105256699577209032590132615988260237052123652332890095616 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d (neg.f64 l))) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 42000000000000001512065386069930017203192959538492820920700754832109498258676819342045049022148133596045681832480175358283889635753027766454201437195974486215989546490179667953149719654571825463288199359336032937967616 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 D #s(literal -1/4 binary64))) #s(literal 1 binary64)) (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 42000000000000001512065386069930017203192959538492820920700754832109498258676819342045049022148133596045681832480175358283889635753027766454201437195974486215989546490179667953149719654571825463288199359336032937967616 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 D #s(literal -1/4 binary64))) #s(literal 1 binary64)) (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 25999999999999999293966867380244796479203821804008471107706555021699767124676642961256812322039703498971344803736659550269088173942107609545301827989586065453837292975396762577042499038181700925430599604439831543808 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 (/.f64 M d) h))) l) #s(literal 1 binary64)) (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 42000000000000001512065386069930017203192959538492820920700754832109498258676819342045049022148133596045681832480175358283889635753027766454201437195974486215989546490179667953149719654571825463288199359336032937967616 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) M) D) (*.f64 d l)) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 -2000000000000000 binary64)) (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l) (*.f64 (*.f64 (/.f64 M d) M) h)) d)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d 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 500000000000000008826400731378189857187439390359932388419721569559872411934627621534506111441735179539411036414609705614267467201356312352807725246163989728250397728169600880974725580403723647263828111371808796024424983945052915681430896212664913964198626187199191511121654255195349215029229518848 binary64)) (*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 -2000000000000000 binary64)) (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) M) h) (*.f64 (*.f64 D D) #s(literal -1/8 binary64))) (*.f64 d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d 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 500000000000000008826400731378189857187439390359932388419721569559872411934627621534506111441735179539411036414609705614267467201356312352807725246163989728250397728169600880974725580403723647263828111371808796024424983945052915681430896212664913964198626187199191511121654255195349215029229518848 binary64)) (*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 -50000000000000002382364672 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.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 500000000000000008826400731378189857187439390359932388419721569559872411934627621534506111441735179539411036414609705614267467201356312352807725246163989728250397728169600880974725580403723647263828111371808796024424983945052915681430896212664913964198626187199191511121654255195349215029229518848 binary64)) (*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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 -8707576121989343/5617791046444737211654078721215702292556178059194708039794690036179146118921905097897139916325235500660003558745981042426837180275450519452901482207483566386805246669527046414884444362538940441232908842252656430276192208823201965046059784704400851161354703458893321819998351435577491134526104885300757004288 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 3190792125773441/17726622920963562283492833353875882150307419319860869157979152909707315649514250439943889552308992750523075148942386782770807567185698815677056677116184170553481231217950104164393978236130449019315710017470734562946173533283208371259654747728689409291887821024109648618981425152 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -8707576121989343/5617791046444737211654078721215702292556178059194708039794690036179146118921905097897139916325235500660003558745981042426837180275450519452901482207483566386805246669527046414884444362538940441232908842252656430276192208823201965046059784704400851161354703458893321819998351435577491134526104885300757004288 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 l h))))) (if (<=.f64 l #s(literal 3190792125773441/17726622920963562283492833353875882150307419319860869157979152909707315649514250439943889552308992750523075148942386782770807567185698815677056677116184170553481231217950104164393978236130449019315710017470734562946173533283208371259654747728689409291887821024109648618981425152 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 6045851110103591/125955231460491477573475786427621032361709434041052227527609040505093074454480376118282617542185112928074454067529947442741953744769736656487116570106253523089501067161322852174933318537813768637901361681988522625958449433505907473287200188342818373796829838966784 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 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal -5588352866697215/79833612381388792466254908521473542642698050417418301660101889697488475674758562631398318619705428043573697873767699809758897519535743746429566871931393256812800226918043427060701508857774519487306134269781756959733232418204834815555554210737921766300284836275030241665694339809213760397115392 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 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
Outputs
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 827545865385885/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (/.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) (neg.f64 l)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 h (/.f64 M d))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 827545865385885/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) M) l))) (*.f64 (sqrt.f64 (/.f64 d l)) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))) (*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 (neg.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 h (/.f64 M d)) D)) #s(literal 1 binary64))))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (/.f64 (*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) (neg.f64 l)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 h (/.f64 M d))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 (neg.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 h (/.f64 M d)) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 (neg.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 h (/.f64 M d)) D)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 (neg.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 h (/.f64 M d)) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 (/.f64 M d) h))) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) M) l) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 h (/.f64 M d)) D)) #s(literal 1 binary64)) (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l)))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 (neg.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 h (/.f64 M d)) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 d #s(literal -3242833953440493/1544206644495472857303583883048380333324864576447617480139933456630175320190394187102969236003396030389305708803686614314192266367994640173851115417028339461681498903477221384921775113999124270181577817371160469578262386195561925496048762173836971712805252506350393444460551564142078418977251644200485277277433072975872 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d (neg.f64 l))) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 d #s(literal -3242833953440493/1544206644495472857303583883048380333324864576447617480139933456630175320190394187102969236003396030389305708803686614314192266367994640173851115417028339461681498903477221384921775113999124270181577817371160469578262386195561925496048762173836971712805252506350393444460551564142078418977251644200485277277433072975872 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (neg.f64 d) l)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 h (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 (neg.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 h (/.f64 M d)) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))
(if (<=.f64 l #s(literal -690694488213835/47634102635436893179040485073748265163400240214004076398607741693502376385799646303105256699577209032590132615988260237052123652332890095616 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d (neg.f64 l))) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 42000000000000001512065386069930017203192959538492820920700754832109498258676819342045049022148133596045681832480175358283889635753027766454201437195974486215989546490179667953149719654571825463288199359336032937967616 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 D #s(literal -1/4 binary64))) #s(literal 1 binary64)) (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 -690694488213835/47634102635436893179040485073748265163400240214004076398607741693502376385799646303105256699577209032590132615988260237052123652332890095616 binary64)) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (neg.f64 d) l)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 h (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 42000000000000001512065386069930017203192959538492820920700754832109498258676819342045049022148133596045681832480175358283889635753027766454201437195974486215989546490179667953149719654571825463288199359336032937967616 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 (*.f64 #s(literal -1/4 binary64) D) (*.f64 h (/.f64 M d))) #s(literal 1 binary64)) (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 42000000000000001512065386069930017203192959538492820920700754832109498258676819342045049022148133596045681832480175358283889635753027766454201437195974486215989546490179667953149719654571825463288199359336032937967616 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 D #s(literal -1/4 binary64))) #s(literal 1 binary64)) (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 42000000000000001512065386069930017203192959538492820920700754832109498258676819342045049022148133596045681832480175358283889635753027766454201437195974486215989546490179667953149719654571825463288199359336032937967616 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l) (*.f64 (*.f64 #s(literal -1/4 binary64) D) (*.f64 h (/.f64 M d))) #s(literal 1 binary64)) (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 25999999999999999293966867380244796479203821804008471107706555021699767124676642961256812322039703498971344803736659550269088173942107609545301827989586065453837292975396762577042499038181700925430599604439831543808 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 (/.f64 M d) h))) l) #s(literal 1 binary64)) (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 25999999999999999293966867380244796479203821804008471107706555021699767124676642961256812322039703498971344803736659550269088173942107609545301827989586065453837292975396762577042499038181700925430599604439831543808 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) M) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 h (/.f64 M d)) D)) l) #s(literal 1 binary64)) (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 42000000000000001512065386069930017203192959538492820920700754832109498258676819342045049022148133596045681832480175358283889635753027766454201437195974486215989546490179667953149719654571825463288199359336032937967616 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) M) D) (*.f64 d l)) (neg.f64 (*.f64 (*.f64 (*.f64 h (/.f64 M d)) D) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (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 42000000000000001512065386069930017203192959538492820920700754832109498258676819342045049022148133596045681832480175358283889635753027766454201437195974486215989546490179667953149719654571825463288199359336032937967616 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (neg.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 h (/.f64 M d)) D)) #s(literal 1 binary64)) (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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 -2000000000000000 binary64)) (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) l) (*.f64 (*.f64 (/.f64 M d) M) h)) d)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d 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 500000000000000008826400731378189857187439390359932388419721569559872411934627621534506111441735179539411036414609705614267467201356312352807725246163989728250397728169600880974725580403723647263828111371808796024424983945052915681430896212664913964198626187199191511121654255195349215029229518848 binary64)) (*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (*.f64 (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))))) #s(literal -2000000000000000 binary64)) (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) M) h) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) l)) d)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (*.f64 (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))))) #s(literal 500000000000000008826400731378189857187439390359932388419721569559872411934627621534506111441735179539411036414609705614267467201356312352807725246163989728250397728169600880974725580403723647263828111371808796024424983945052915681430896212664913964198626187199191511121654255195349215029229518848 binary64)) (*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 -2000000000000000 binary64)) (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) M) h) (*.f64 (*.f64 D D) #s(literal -1/8 binary64))) (*.f64 d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d 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 500000000000000008826400731378189857187439390359932388419721569559872411934627621534506111441735179539411036414609705614267467201356312352807725246163989728250397728169600880974725580403723647263828111371808796024424983945052915681430896212664913964198626187199191511121654255195349215029229518848 binary64)) (*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (*.f64 (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))))) #s(literal -2000000000000000 binary64)) (*.f64 (*.f64 #s(approx (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) M) h) (*.f64 #s(literal -1/8 binary64) (*.f64 D D))) (*.f64 d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (*.f64 (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))))) #s(literal 500000000000000008826400731378189857187439390359932388419721569559872411934627621534506111441735179539411036414609705614267467201356312352807725246163989728250397728169600880974725580403723647263828111371808796024424983945052915681430896212664913964198626187199191511121654255195349215029229518848 binary64)) (*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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 -50000000000000002382364672 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.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 500000000000000008826400731378189857187439390359932388419721569559872411934627621534506111441735179539411036414609705614267467201356312352807725246163989728250397728169600880974725580403723647263828111371808796024424983945052915681430896212664913964198626187199191511121654255195349215029229518848 binary64)) (*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (*.f64 (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))))) #s(literal -50000000000000002382364672 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l)) (*.f64 (/.f64 (*.f64 M M) d) (*.f64 #s(literal 1/8 binary64) (*.f64 D D))))) (if (<=.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (*.f64 (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))))) #s(literal 500000000000000008826400731378189857187439390359932388419721569559872411934627621534506111441735179539411036414609705614267467201356312352807725246163989728250397728169600880974725580403723647263828111371808796024424983945052915681430896212664913964198626187199191511121654255195349215029229518848 binary64)) (*.f64 #s(approx (* (+ (* (* 1/4 (pow (/ (/ d D) M) -2)) (* -1/2 (/ h l))) 1) (sqrt (/ d l))) (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 -8707576121989343/5617791046444737211654078721215702292556178059194708039794690036179146118921905097897139916325235500660003558745981042426837180275450519452901482207483566386805246669527046414884444362538940441232908842252656430276192208823201965046059784704400851161354703458893321819998351435577491134526104885300757004288 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 3190792125773441/17726622920963562283492833353875882150307419319860869157979152909707315649514250439943889552308992750523075148942386782770807567185698815677056677116184170553481231217950104164393978236130449019315710017470734562946173533283208371259654747728689409291887821024109648618981425152 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -8707576121989343/5617791046444737211654078721215702292556178059194708039794690036179146118921905097897139916325235500660003558745981042426837180275450519452901482207483566386805246669527046414884444362538940441232908842252656430276192208823201965046059784704400851161354703458893321819998351435577491134526104885300757004288 binary64)) (/.f64 (*.f64 #s(approx (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 3190792125773441/17726622920963562283492833353875882150307419319860869157979152909707315649514250439943889552308992750523075148942386782770807567185698815677056677116184170553481231217950104164393978236130449019315710017470734562946173533283208371259654747728689409291887821024109648618981425152 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h l)) (neg.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 -8707576121989343/5617791046444737211654078721215702292556178059194708039794690036179146118921905097897139916325235500660003558745981042426837180275450519452901482207483566386805246669527046414884444362538940441232908842252656430276192208823201965046059784704400851161354703458893321819998351435577491134526104885300757004288 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 l h))))) (if (<=.f64 l #s(literal 3190792125773441/17726622920963562283492833353875882150307419319860869157979152909707315649514250439943889552308992750523075148942386782770807567185698815677056677116184170553481231217950104164393978236130449019315710017470734562946173533283208371259654747728689409291887821024109648618981425152 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -8707576121989343/5617791046444737211654078721215702292556178059194708039794690036179146118921905097897139916325235500660003558745981042426837180275450519452901482207483566386805246669527046414884444362538940441232908842252656430276192208823201965046059784704400851161354703458893321819998351435577491134526104885300757004288 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))) (if (<=.f64 l #s(literal 3190792125773441/17726622920963562283492833353875882150307419319860869157979152909707315649514250439943889552308992750523075148942386782770807567185698815677056677116184170553481231217950104164393978236130449019315710017470734562946173533283208371259654747728689409291887821024109648618981425152 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h l)) (neg.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 6045851110103591/125955231460491477573475786427621032361709434041052227527609040505093074454480376118282617542185112928074454067529947442741953744769736656487116570106253523089501067161322852174933318537813768637901361681988522625958449433505907473287200188342818373796829838966784 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 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 6045851110103591/125955231460491477573475786427621032361709434041052227527609040505093074454480376118282617542185112928074454067529947442741953744769736656487116570106253523089501067161322852174933318537813768637901361681988522625958449433505907473287200188342818373796829838966784 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 -5588352866697215/79833612381388792466254908521473542642698050417418301660101889697488475674758562631398318619705428043573697873767699809758897519535743746429566871931393256812800226918043427060701508857774519487306134269781756959733232418204834815555554210737921766300284836275030241665694339809213760397115392 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 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(if (<=.f64 l #s(literal -5588352866697215/79833612381388792466254908521473542642698050417418301660101889697488475674758562631398318619705428043573697873767699809758897519535743746429566871931393256812800226918043427060701508857774519487306134269781756959733232418204834815555554210737921766300284836275030241665694339809213760397115392 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.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 l h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.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 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))

soundness1.9s (10.7%)

Memory
40.5MiB live, 873.5MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
031219042
192018416
2333318298
3727418223
0814617854
01473819
14133735
214983698
341763682
479503682
081723598
089399
0153407
1512344
23776320
08288311
036319915
1109119162
2392319012
0839818604
093490
0147469
1499432
23663394
08710384
087433
0148415
1479392
23472384
08194383
02272
03868
112467
282867
0873065
Stop Event
fuel
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
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 3 767 to 1 738 computations (53.9% saved)

preprocess181.0ms (1%)

Memory
-9.7MiB live, 402.8MiB allocated
Compiler

Compiled 4 300 to 1 554 computations (63.9% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...