Henrywood and Agarwal, Equation (12)

Time bar (total: 20.6s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

analyze554.0ms (2.7%)

Memory
-6.8MiB live, 538.5MiB allocated
Algorithm
1×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.0s (29.1%)

Memory
9.0MiB live, 6 511.9MiB allocated
Samples
2.8s13 066×0invalid
1.6s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 3.1s
ival-mult: 993.0ms (31.8% of total)
ival-div: 952.0ms (30.5% of total)
ival-pow: 772.0ms (24.8% of total)
ival-pow2: 238.0ms (7.6% of total)
ival-sub: 117.0ms (3.8% of total)
exact: 21.0ms (0.7% of total)
ival-true: 16.0ms (0.5% of total)
ival-assert: 9.0ms (0.3% of total)
Bogosity

explain353.0ms (1.7%)

Memory
-14.1MiB live, 740.4MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
650-0-(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
620-2(-3.6940550392225415e-256 -6.67088001017014e+62 -3.5690511339324396e-140 1.233022923579292e+213 -4.1841276070632067e-218)(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
460-2(-6.220128450338702e+245 -1.9289947391900628e+172 -2.5805456458334225e-45 5.8390800197437255e-126 2.0999245239650584e+215)(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
311(1.6321050825247752e-122 3.02235999122083e-167 9.446552270069845e+52 7.87697322114134e-259 9.88473795415252e-187)2(1.271678552453821e-208 1.4914174488749558e+298 5.6963597194610605e+191 -1.3175743696399215e-169 -2.395460933905049e-149)(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
170-1(2.7573174919994035e-262 1.7723729779184855e-16 4.268893807497452e+122 -8.247168721572899e-52 1.1245701376290092e-107)(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
10-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)))
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
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
pow.f64(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))oflow-rescue480
↳(/.f64 d l)overflow48
pow.f64(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))oflow-rescue390
↳(/.f64 d h)overflow39
pow.f64(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))uflow-rescue210
↳(/.f64 d h)underflow21
pow.f64(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))uflow-rescue170
↳(/.f64 d l)underflow17
/.f64(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))o/n160
↳(*.f64 M D)overflow26
*.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*o150
*.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*u70
*.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*o50
*.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*o40
↳(/.f64 d h)underflow21
↳(/.f64 d l)underflow17
↳(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))underflow13
↳(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))overflow66
↳(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))overflow65
↳(/.f64 h l)overflow40
↳(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))overflow72
↳(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))overflow72
↳(*.f64 M D)overflow26
↳(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))overflow29
/.f64(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))u/n30
↳(*.f64 M D)underflow27
*.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))underflow88
↳(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))underflow88
↳(*.f64 M D)underflow27
↳(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))underflow39
↳(/.f64 h l)overflow40
*.f64(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))n*o10
*.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*u10
↳(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))overflow66
↳(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))overflow65
↳(*.f64 M D)overflow26
↳(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))overflow29
↳(/.f64 h l)underflow25
Confusion
Predicted +Predicted -
+787
-44127
Precision
0.639344262295082
Recall
0.9176470588235294
Confusion?
Predicted +Predicted MaybePredicted -
+7807
-440127
Precision?
0.639344262295082
Recall?
0.9176470588235294
Freqs
test
numberfreq
0134
179
231
310
42
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
124.0ms512×0valid
Compiler

Compiled 352 to 70 computations (80.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 66.0ms
ival-pow: 20.0ms (30.3% of total)
ival-mult: 19.0ms (28.8% of total)
ival-div: 18.0ms (27.3% of total)
ival-pow2: 5.0ms (7.6% of total)
ival-sub: 2.0ms (3% of total)
exact: 1.0ms (1.5% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

preprocess142.0ms (0.7%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
0168564
1558553
21960548
34611548
02229
03827
16727
217427
3105427
4344127
5672427
0802726
Stop Event
1×iter limit
1×node limit
1×iter limit
1×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) h) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 l (*.f64 (*.f64 d d) #s(literal 4 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 40 to 22 computations (45% saved)

eval0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

Memory
2.5MiB live, 2.5MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶67.8%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 40 to 22 computations (45% saved)

simplify101.0ms (0.5%)

Memory
-14.9MiB live, 144.3MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 4 expressions of interest:

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

Useful iterations: 0 (0.0ms)

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

localize78.0ms (0.4%)

Memory
1.3MiB live, 165.9MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy6.949160800704972
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
accuracy10.602894790147543
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy14.488753544917344
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy15.398656842665549
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
64.0ms256×0valid
Compiler

Compiled 156 to 24 computations (84.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 46.0ms
ival-mult: 23.0ms (49.7% of total)
ival-pow: 10.0ms (21.6% of total)
ival-div: 9.0ms (19.4% of total)
ival-pow2: 3.0ms (6.5% of total)
ival-sub: 1.0ms (2.2% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series53.0ms (0.3%)

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

15 calls:

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

simplify279.0ms (1.4%)

Memory
-26.1MiB live, 205.6MiB allocated
Algorithm
1×egg-herbie
Rules
11 250×lower-*.f64
11 250×lower-*.f32
6 050×associate-*r*
2 660×associate-*r/
2 342×times-frac
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0341972
1741940
22561940
311811940
432731940
535071940
635941940
736201940
836371940
936431940
1047531940
1148231940
1248321940
1348321940
1457471940
1573301940
1673481940
1773481940
1873481940
1973481940
0107911940
Stop Event
1×iter limit
1×node limit
Counts
180 → 180
Calls
Call 1
Inputs
(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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d 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)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(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) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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)))
(* -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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(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 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* (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 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 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 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 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 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 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))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(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 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 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 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 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 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 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))
(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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 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))
(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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 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))
(* -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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 d d)) M) #s(literal 1/4 binary64)) D) M)
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(* 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))

rewrite141.0ms (0.7%)

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

Useful iterations: 0 (0.0ms)

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

eval173.0ms (0.8%)

Memory
-5.4MiB live, 262.9MiB allocated
Compiler

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

prune161.0ms (0.8%)

Memory
34.1MiB live, 342.2MiB allocated
Pruning

24 alts after pruning (24 fresh and 0 done)

PrunedKeptTotal
New76824792
Fresh000
Picked101
Done000
Total76924793
Accuracy
89.3%
Counts
793 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
66.7%
(*.f64 (*.f64 (pow.f64 (pow.f64 (/.f64 h d) #s(literal -1/8 binary64)) #s(literal 4 binary64)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
66.9%
(*.f64 (*.f64 (pow.f64 (pow.f64 (/.f64 h d) #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))))
68.1%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
52.8%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) #s(literal 1/4 binary64))) d) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))) d)))
52.2%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 D M) D) M)) (*.f64 #s(literal 4 binary64) (*.f64 d d)))))
▶55.4%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))))
59.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/2 binary64) h) (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) (*.f64 #s(literal 4 binary64) (*.f64 d d))))) l)))
▶73.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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
55.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 h l) (*.f64 (*.f64 (*.f64 D M) (/.f64 (*.f64 D M) (*.f64 #s(literal 4 binary64) (*.f64 d d)))) #s(literal 1/2 binary64)))))
▶69.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 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
62.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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
67.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 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 M (/.f64 h l))) #s(literal 1/2 binary64)))))
55.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D M)) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
▶50.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
38.8%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
33.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 #s(literal 1 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.2%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
67.8%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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.6%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d l))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
39.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶38.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
67.0%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
38.2%
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
39.2%
(*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 1 964 to 1 180 computations (39.9% saved)

simplify153.0ms (0.7%)

Memory
4.1MiB live, 199.2MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff384
(*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1088
(/.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)))
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-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-diff4800
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff0
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1088
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Rules
6 646×lower-*.f32
6 590×lower-*.f64
5 258×lower-/.f32
5 232×lower-/.f64
1 340×associate-/r/
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
072838
0127817
1263779
2986773
34746773
08722767
Stop Event
1×iter limit
1×node limit
1×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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))
(/.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)
M
D
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
(*.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)
(/.f64 #s(literal 1 binary64) h)
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h)
(*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64))
(/.f64 D (*.f64 l (*.f64 d d)))
D
(*.f64 l (*.f64 d d))
(*.f64 d d)
#s(literal 1/8 binary64)
(*.f64 (*.f64 M D) M)
(*.f64 M D)
M
(*.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 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(*.f64 M D)
M
D
(*.f64 #s(literal 2 binary64) d)
(/.f64 h l)
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))))
(*.f64 (pow.f64 (/.f64 d 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 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))))
(/.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)))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M))
(*.f64 (/.f64 h l) #s(literal 1/2 binary64))
(/.f64 h l)
#s(literal 1/2 binary64)
(*.f64 D M)
D
M
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))
(*.f64 #s(literal 4 binary64) (*.f64 d d))
#s(literal 4 binary64)
(*.f64 d d)
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
(*.f64 (pow.f64 (/.f64 d 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 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))
(*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)))
(/.f64 h l)
(*.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)))
#s(literal 1/2 binary64)
(*.f64 D #s(literal 1/2 binary64))
D
(/.f64 M d)
M
(*.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)
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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 D d) M)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) h) (*.f64 l d)) #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))) (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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 D d) M)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) h) (*.f64 l d)) #s(literal 1 binary64))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) h) (*.f64 l d)) (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D (*.f64 l d)))
(*.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)
M
D
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
(*.f64 (*.f64 M h) (/.f64 (*.f64 #s(literal 1/4 binary64) D) d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 (/.f64 M d) (*.f64 #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)
(/.f64 #s(literal 1 binary64) h)
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M)))) (*.f64 (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))) (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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M))
(*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h)
(*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h)
(*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64))
(*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l)))
(/.f64 D (*.f64 l (*.f64 d d)))
(/.f64 D (*.f64 (*.f64 d d) l))
D
(*.f64 l (*.f64 d d))
(*.f64 (*.f64 d d) l)
(*.f64 d d)
#s(literal 1/8 binary64)
(*.f64 (*.f64 M D) M)
(*.f64 (*.f64 M M) D)
(*.f64 M D)
(*.f64 D M)
M
(*.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 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) D)) (*.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) D)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) D)) (*.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) D)) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
(*.f64 (/.f64 h l) (*.f64 (/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) d)) (*.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) D)))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) d)) (*.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) D))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(*.f64 (*.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) (/.f64 M (*.f64 #s(literal 2 binary64) d))) (*.f64 D D))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(*.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) D)
(*.f64 M D)
(*.f64 D M)
M
D
(*.f64 #s(literal 2 binary64) d)
(/.f64 h l)
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))))
(*.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 D M) #s(literal 1/8 binary64)) M) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) D) #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))) (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 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))))
(neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 D M) #s(literal 1/8 binary64)) M) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) D) #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)))
(*.f64 (*.f64 (*.f64 (*.f64 D M) #s(literal 1/8 binary64)) M) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) D))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D)
(*.f64 (/.f64 h l) #s(literal 1/2 binary64))
(/.f64 h l)
#s(literal 1/2 binary64)
(*.f64 D M)
D
M
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))
(*.f64 (/.f64 d (*.f64 D M)) (*.f64 #s(literal 4 binary64) d))
(*.f64 #s(literal 4 binary64) (*.f64 d d))
#s(literal 4 binary64)
(*.f64 d d)
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 D d) M)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) h) (*.f64 l d)) #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))) (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 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 D d) M)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) h) (*.f64 l d)) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) h) (*.f64 l d)) (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))
(*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) M) h) (*.f64 l d))
(/.f64 h l)
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 (/.f64 M d) (*.f64 #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)
#s(literal 1/2 binary64)
(*.f64 D #s(literal 1/2 binary64))
D
(/.f64 M d)
M
(*.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)

localize219.0ms (1.1%)

Memory
-39.0MiB live, 442.3MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy3.2867268941074688
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
accuracy4.493545265893981
(*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)))
accuracy7.11470944227297
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy8.921605440297713
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy6.888992172642042
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M))
accuracy7.11470944227297
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy7.296639957323636
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))
accuracy8.921605440297713
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy2.746398853873022
(*.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))))
accuracy3.9174321183183665
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
accuracy7.000125111822401
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy7.11470944227297
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy3.323988928157656
(/.f64 D (*.f64 l (*.f64 d d)))
accuracy7.11470944227297
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy8.410816067769208
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
accuracy8.921605440297713
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy3.2867268941074688
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
accuracy3.485353974629821
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
accuracy7.11470944227297
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy8.921605440297713
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
71.0ms136×0valid
67.0ms120×0invalid
Compiler

Compiled 864 to 64 computations (92.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 94.0ms
ival-mult: 48.0ms (51.1% of total)
ival-div: 25.0ms (26.6% of total)
ival-pow: 11.0ms (11.7% of total)
ival-sub: 4.0ms (4.3% of total)
ival-sqrt: 3.0ms (3.2% of total)
ival-pow2: 3.0ms (3.2% of total)
exact: 1.0ms (1.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series130.0ms (0.6%)

Memory
-1.6MiB live, 262.4MiB allocated
Counts
18 → 792
Calls
Call 1
Inputs
#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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 (*.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 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())
#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<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/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<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/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (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 (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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) 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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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) 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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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) 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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf M) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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 (/.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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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 (/.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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<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 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf l) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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 (/.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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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) 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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf D) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf D) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (patch (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) #<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/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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) 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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor 0 d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<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/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor inf d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<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/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) (patch (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<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 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (patch (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<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 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) (patch (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf d) (#s(alt (/.f64 D (*.f64 l (*.f64 d d))) (patch (/.f64 D (*.f64 l (*.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (pow d 2) (* D M))) (taylor -inf d) (#s(alt (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) (patch (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)) #<representation binary64>) () ())) ())
Calls

15 calls:

TimeVariablePointExpression
11.0ms
M
@inf
((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (pow (/ (* M D) (* 2 d)) 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (/ (* (* (/ h l) 1/2) (* D M)) (/ (* 4 (* d d)) (* D M))) (* (/ h l) (* (* 1/2 (* D 1/2)) (/ M d))) (/ (* (* (/ 1/2 d) M) D) l) (* (* (/ 1/2 d) M) D) (* (* (* (/ D (* l (* d d))) 1/8) h) (* (* M D) M)) (/ D (* l (* d d))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* 4 (* d d)) (* D M)) (* (* (/ h l) 1/2) (* D M)))
9.0ms
M
@0
((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (pow (/ (* M D) (* 2 d)) 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (/ (* (* (/ h l) 1/2) (* D M)) (/ (* 4 (* d d)) (* D M))) (* (/ h l) (* (* 1/2 (* D 1/2)) (/ M d))) (/ (* (* (/ 1/2 d) M) D) l) (* (* (/ 1/2 d) M) D) (* (* (* (/ D (* l (* d d))) 1/8) h) (* (* M D) M)) (/ D (* l (* d d))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* 4 (* d d)) (* D M)) (* (* (/ h l) 1/2) (* D M)))
8.0ms
D
@0
((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (pow (/ (* M D) (* 2 d)) 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (/ (* (* (/ h l) 1/2) (* D M)) (/ (* 4 (* d d)) (* D M))) (* (/ h l) (* (* 1/2 (* D 1/2)) (/ M d))) (/ (* (* (/ 1/2 d) M) D) l) (* (* (/ 1/2 d) M) D) (* (* (* (/ D (* l (* d d))) 1/8) h) (* (* M D) M)) (/ D (* l (* d d))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* 4 (* d d)) (* D M)) (* (* (/ h l) 1/2) (* D M)))
7.0ms
d
@inf
((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (pow (/ (* M D) (* 2 d)) 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (/ (* (* (/ h l) 1/2) (* D M)) (/ (* 4 (* d d)) (* D M))) (* (/ h l) (* (* 1/2 (* D 1/2)) (/ M d))) (/ (* (* (/ 1/2 d) M) D) l) (* (* (/ 1/2 d) M) D) (* (* (* (/ D (* l (* d d))) 1/8) h) (* (* M D) M)) (/ D (* l (* d d))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* 4 (* d d)) (* D M)) (* (* (/ h l) 1/2) (* D M)))
6.0ms
d
@0
((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (pow (/ (* M D) (* 2 d)) 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (/ (* (* (/ h l) 1/2) (* D M)) (/ (* 4 (* d d)) (* D M))) (* (/ h l) (* (* 1/2 (* D 1/2)) (/ M d))) (/ (* (* (/ 1/2 d) M) D) l) (* (* (/ 1/2 d) M) D) (* (* (* (/ D (* l (* d d))) 1/8) h) (* (* M D) M)) (/ D (* l (* d d))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* 4 (* d d)) (* D M)) (* (* (/ h l) 1/2) (* D M)))

simplify174.0ms (0.8%)

Memory
26.2MiB live, 255.6MiB allocated
Algorithm
1×egg-herbie
Rules
7 146×lower-*.f64
7 146×lower-*.f32
3 816×lower-/.f32
3 816×lower-/.f64
3 086×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
017310867
150010758
2180710718
3429510690
0844710564
Stop Event
1×iter limit
1×node limit
Counts
792 → 792
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d 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))
(* 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
(+ 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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d 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))
(* -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)) (* (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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) 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/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)) (* (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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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/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
(+ 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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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)))))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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/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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (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))))))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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/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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (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))))))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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))
(* -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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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 d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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)))))
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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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 d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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)))))
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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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 d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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/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
(+ 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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 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)))))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/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))))))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/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))))))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M h)) l))
(* 1/2 (/ (* D (* M 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/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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- (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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/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)
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(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/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)))))))
(* 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
(+ 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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 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)))))))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* -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/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/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
(+ 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/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1 (* (* 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)))))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
(* 4 (/ (pow d 2) (* D M)))
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/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #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))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* -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 (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 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/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(* -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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* -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 (*.f64 (*.f64 l l) l)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.f64 M M) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.f64 M M) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #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))
(* -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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* -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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #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))
(* 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* (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 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* (* 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 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #s(literal 1/2 binary64))
(* 1/2 (/ (* D (* M h)) l))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) l) #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))
(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/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 M M)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d 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/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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)))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M 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/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/4 (/ (* D (* M h)) (* d l)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M D)) (/.f64 h (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (* (* 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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 D D) (*.f64 (/.f64 (*.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(* 4 (/ (pow d 2) (* D M)))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))

rewrite196.0ms (1%)

Memory
-10.8MiB live, 350.3MiB allocated
Rules
4 938×lower-/.f32
4 912×lower-/.f64
4 072×lower-*.f32
4 026×lower-*.f64
1 426×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
064238
0111232
1349224
22280222
08387220
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
18 → 1 055
Calls
Call 1
Inputs
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
(/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))
(*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)))
(/.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 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M))
(/.f64 D (*.f64 l (*.f64 d d)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(*.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 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M))
Outputs
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d)))))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(*.f64 (sqrt.f64 d) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(pow.f64 (*.f64 (/.f64 d h) (/.f64 d h)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 h d) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1 binary64))
(pow.f64 (/.f64 d h) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal -1 binary64))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 h d)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d)))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(sqrt.f64 (/.f64 d h))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 h))) (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(-.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 h) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) l) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (sqrt.f64 d) (pow.f64 (pow.f64 l #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(sqrt.f64 (/.f64 d l))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M d))
(*.f64 (*.f64 h (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M d)) #s(literal 1 binary64))
(*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 h d))
(*.f64 (*.f64 (/.f64 (neg.f64 M) d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d))))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h)))
(*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) h)
(*.f64 (/.f64 M d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) D) h)) #s(literal -1 binary64)))
(*.f64 (/.f64 M d) (*.f64 (*.f64 #s(literal 1/4 binary64) D) h))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 M d) h)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) h))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) h)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M d)))
(*.f64 h (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 h (*.f64 M (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) (neg.f64 d))
(/.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) D)) (/.f64 d M))
(/.f64 (*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 (/.f64 d h)))
(/.f64 (*.f64 h (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)
(/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h) d)
(/.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M d)) #s(literal 1 binary64))
(/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 d h))
(/.f64 (*.f64 (/.f64 (neg.f64 M) d) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 #s(literal -1 binary64) h))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d)))
(/.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 M d) h)))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 h (*.f64 M (*.f64 #s(literal 1/4 binary64) D)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d))
(/.f64 h (/.f64 d (*.f64 M (*.f64 #s(literal 1/4 binary64) D))))
(neg.f64 (*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h)))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) h)) (*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h)))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d)) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 h) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 h) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) (sqrt.f64 h))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))) (-.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))) (-.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (neg.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))) (neg.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (*.f64 (/.f64 d l) d)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))) (neg.f64 (*.f64 (sqrt.f64 h) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 (*.f64 (/.f64 d l) d)))) (neg.f64 (*.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (/.f64 d l) d)))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (sqrt.f64 h))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))) (*.f64 (sqrt.f64 h) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 h) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (*.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (pow.f64 (*.f64 (/.f64 d h) d) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (*.f64 (/.f64 d h) d) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(+.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(+.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 M #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 D d))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 M D)) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) M) #s(literal 1 binary64)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M D) (*.f64 M D)) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal -1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 D d) (/.f64 D d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 M M) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 2 binary64)) (*.f64 M M))
(*.f64 (pow.f64 (/.f64 M d) #s(literal 2 binary64)) (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (/.f64 M d) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 2 binary64)) (pow.f64 D #s(literal 2 binary64)))
(*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 M) D)) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 M #s(literal 1/2 binary64))) (/.f64 D d))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 M D)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) M) (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (neg.f64 M) D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 #s(literal -2 binary64) d))))
(*.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 #s(literal 2 binary64) d))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -2 binary64) d) d)))
(*.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) d))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) d) d)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 (neg.f64 M) D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal -2 binary64) d))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal -2 binary64) d))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal -1/2 binary64) d)))
(*.f64 (*.f64 (/.f64 D d) (/.f64 D d)) (*.f64 (*.f64 M M) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 M M) #s(literal 1/4 binary64)) (*.f64 (/.f64 D d) (/.f64 D d)))
(*.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal -1/2 binary64) d)) (*.f64 (*.f64 M D) (*.f64 M D)))
(*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64))) (*.f64 M M))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 2 binary64)))
(*.f64 (*.f64 M M) (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) d)))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)) #s(literal 2 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (pow.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal -2 binary64) d))))
(*.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) d))))
(*.f64 (*.f64 M D) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))
(*.f64 M (pow.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 M (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal -2 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))
(pow.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) d))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -2 binary64) d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 M) D))) (*.f64 #s(literal 2 binary64) d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 M D))) (*.f64 #s(literal -2 binary64) d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (neg.f64 M) D))) (neg.f64 (*.f64 d (*.f64 #s(literal -2 binary64) d))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 M D))) (neg.f64 (*.f64 d (*.f64 #s(literal 2 binary64) d))))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) (neg.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 M D))) (neg.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) d))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 (neg.f64 M) D))) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal -2 binary64) d))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 M D))) (neg.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal -2 binary64) d))))
(/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) d)
(/.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) d)
(/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 M) D)) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 M #s(literal 1/2 binary64))) (/.f64 d D))
(/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 M D)) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) M) (/.f64 (*.f64 #s(literal 2 binary64) d) D))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 (*.f64 d (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))
(/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (neg.f64 M) D)) (*.f64 d (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 M D)) (*.f64 d (*.f64 #s(literal 2 binary64) d)))
(/.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 (*.f64 #s(literal -2 binary64) d) d))
(/.f64 (*.f64 (*.f64 (neg.f64 M) D) (*.f64 M D)) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) d)))
(/.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 (*.f64 #s(literal 2 binary64) d) d))
(/.f64 (*.f64 (*.f64 M D) (*.f64 (neg.f64 M) D)) (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 M D) (*.f64 M D)) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) d))
(/.f64 (*.f64 (neg.f64 M) D) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (neg.f64 M) D) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) d))))
(/.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 M D) (neg.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 M D) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal -2 binary64) d))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) d)))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 (*.f64 M D) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) d) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 M) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 #s(literal -2 binary64) d)) (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (neg.f64 M) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 #s(literal 2 binary64) d)) (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) d) (*.f64 (*.f64 (neg.f64 M) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) d)) (*.f64 (*.f64 (neg.f64 M) D) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (neg.f64 M) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) d) (*.f64 (*.f64 M D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal -2 binary64) d)) (*.f64 (*.f64 M D) (*.f64 (neg.f64 M) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal -2 binary64) d)) (*.f64 (*.f64 M D) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal -2 binary64) d)) (*.f64 (neg.f64 M) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(exp.f64 (+.f64 (log.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) (log.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))))
(*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)))) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)))) (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (neg.f64 h)) (/.f64 #s(literal -1 binary64) l) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) h) (/.f64 #s(literal 1 binary64) l) #s(literal 1 binary64))
(fma.f64 (/.f64 (neg.f64 h) l) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (/.f64 #s(literal 1 binary64) l) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (/.f64 #s(literal -1 binary64) l) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 (/.f64 h l) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 (neg.f64 h) l) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))))
(+.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (*.f64 #s(literal 1/4 binary64) D))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 d d) M) M) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M D) (*.f64 #s(literal 1/4 binary64) D))) #s(literal -1 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 d d) M) (/.f64 l (*.f64 #s(literal 1/2 binary64) h))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 4 binary64) D) (/.f64 l (*.f64 #s(literal 1/2 binary64) h))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 d d) M) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 4 binary64) D) (/.f64 l h)) #s(literal -1 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 d d) M) (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D)) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M M) D)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (/.f64 l (*.f64 #s(literal 1/2 binary64) h))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M D) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (/.f64 l h)) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d (/.f64 d (*.f64 M D))) M) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (*.f64 M D)) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 d (/.f64 d (*.f64 M D))) (/.f64 l (*.f64 #s(literal 1/2 binary64) h))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 l (*.f64 #s(literal 1/2 binary64) h))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 d (/.f64 d (*.f64 M D))) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 l h)) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 d (/.f64 d (*.f64 M D))) (/.f64 #s(literal 2 binary64) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d)))) M)
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 #s(literal -4 binary64) (*.f64 d d))) (*.f64 (neg.f64 M) D))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M (*.f64 d d)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) #s(literal 1/4 binary64)) (*.f64 D (/.f64 M (*.f64 d d))))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 M D)) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 d d))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D (*.f64 M D)))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) #s(literal 1/4 binary64)) (/.f64 M (*.f64 d d))) M) D)
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) #s(literal 1/4 binary64)) (/.f64 M (*.f64 d d))) D) M)
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 d d))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D)) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 M (/.f64 M (*.f64 d d))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 (*.f64 M M) D))
(*.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 M (*.f64 d d))))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 M D) (/.f64 M (*.f64 d d))))
(*.f64 (/.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 (*.f64 M D) (*.f64 M D)))
(*.f64 (/.f64 (/.f64 h l) (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 M D)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) #s(literal 1/4 binary64)) (*.f64 M (*.f64 D (/.f64 M (*.f64 d d)))))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 M D) (*.f64 D (/.f64 M (*.f64 d d)))))
(*.f64 (*.f64 (*.f64 M D) #s(literal 1/4 binary64)) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D (/.f64 M (*.f64 d d)))))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 D (/.f64 M (*.f64 d d)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D))))))
(*.f64 (*.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D (*.f64 M D))) (*.f64 (/.f64 h l) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) #s(literal 1/4 binary64)) (/.f64 M (*.f64 d d))) (*.f64 M D))
(*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 M (*.f64 d d))))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) (*.f64 M (*.f64 (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d))) M)))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (*.f64 d (/.f64 d (*.f64 M D))) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D)) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d))) M) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) (/.f64 l (*.f64 #s(literal 1/2 binary64) h))) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d))) M) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D))
(*.f64 (*.f64 (/.f64 (neg.f64 h) l) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 (*.f64 M D) (*.f64 #s(literal -4 binary64) (*.f64 d d))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 M D))))))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (/.f64 (*.f64 M D) (*.f64 #s(literal -4 binary64) (*.f64 d d)))))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d))) M))
(*.f64 (*.f64 M D) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) #s(literal 1/4 binary64)) (/.f64 M (*.f64 d d))))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D (*.f64 M D))))
(*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d))) M)))
(*.f64 (/.f64 h l) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D (*.f64 M D)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (pow.f64 (/.f64 (/.f64 (*.f64 d d) M) (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D)) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h l) (*.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D (*.f64 M D)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d)))) M))
(pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 M D))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 (/.f64 (*.f64 d d) M)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) #s(literal 1/4 binary64))) (neg.f64 (*.f64 d (/.f64 d (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 M D))) (*.f64 #s(literal -4 binary64) (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D (*.f64 M D))))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) #s(literal 1/4 binary64)) (/.f64 M (*.f64 d d)))) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 M D))) (neg.f64 (*.f64 l (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 d d) M))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) #s(literal 1/4 binary64)) (*.f64 d (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 M D)) (*.f64 #s(literal 4 binary64) (*.f64 d d)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D (*.f64 M D)))) l)
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 M D)) (*.f64 l (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D (*.f64 M D))) (/.f64 l (*.f64 #s(literal 1/2 binary64) h)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) #s(literal 1/4 binary64)) (/.f64 M (*.f64 d d))) (/.f64 #s(literal 1 binary64) (*.f64 M D)))
(/.f64 (*.f64 (/.f64 (neg.f64 h) l) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 d d)) (*.f64 M D)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D))) (/.f64 l (*.f64 #s(literal 1/2 binary64) h))))
(/.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 d d) M) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 #s(literal 1/4 binary64) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (/.f64 d (*.f64 M D))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) #s(literal 1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) (*.f64 D (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))) (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) #s(literal 1/4 binary64)) (/.f64 M (*.f64 d d)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 M D))))
(neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (/.f64 (*.f64 M D) (*.f64 #s(literal -4 binary64) (*.f64 d d)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 d d)) (*.f64 M D))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (/.f64 (*.f64 M D) (*.f64 #s(literal -4 binary64) (*.f64 d d)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (/.f64 (*.f64 M D) (*.f64 #s(literal -4 binary64) (*.f64 d d)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) (*.f64 M D)))) #s(literal -1 binary64)))
(*.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D))) (/.f64 #s(literal -1 binary64) l))
(*.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 h l)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 M)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 (/.f64 h l) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (/.f64 h l) (/.f64 M d)) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h)) (/.f64 #s(literal -1 binary64) l))
(*.f64 (*.f64 (neg.f64 h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 l) d)))
(*.f64 (*.f64 h (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (/.f64 #s(literal 1 binary64) (*.f64 l d)))
(*.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h)) (/.f64 #s(literal 1 binary64) (*.f64 d (neg.f64 l))))
(*.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h) (/.f64 #s(literal 1 binary64) (*.f64 l d)))
(*.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M d)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 l h) d)))
(*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 #s(literal 1 binary64) (*.f64 d (/.f64 l h))))
(*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M d))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 h l) (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 h l))
(*.f64 (/.f64 M d) (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) (/.f64 h l)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (/.f64 h l)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 h (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (*.f64 l d)))
(*.f64 h (/.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) l))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D))))
(pow.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d) l) #s(literal -1 binary64))
(pow.f64 (*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)))) l)
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 h l))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 M))) d)
(/.f64 (neg.f64 (*.f64 (/.f64 h l) (*.f64 M (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) M)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 (*.f64 (neg.f64 l) d)))
(/.f64 (neg.f64 (*.f64 h (*.f64 M (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 (*.f64 l d)))
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h))) (neg.f64 (*.f64 d (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) (neg.f64 (*.f64 l d)))
(/.f64 (neg.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 (/.f64 d M)))
(/.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 l))
(/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 h l)) d)
(/.f64 (*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 M)) (neg.f64 d))
(/.f64 (*.f64 (/.f64 h l) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)
(/.f64 (*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) M) d)
(/.f64 (*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h)) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 (*.f64 (/.f64 l h) d)))
(/.f64 (neg.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 (*.f64 d (/.f64 l h))))
(/.f64 (*.f64 (neg.f64 h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (*.f64 (neg.f64 l) d))
(/.f64 (*.f64 h (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (*.f64 l d))
(/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h)) (*.f64 d (neg.f64 l)))
(/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h) (*.f64 l d))
(/.f64 (*.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) D)) (/.f64 M d)) l)
(/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 l h) d))
(/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (*.f64 d (/.f64 l h)))
(/.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 d M))
(/.f64 (*.f64 (/.f64 (neg.f64 M) d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 (/.f64 l h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d))))
(/.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (/.f64 h l) (/.f64 d (*.f64 M (*.f64 #s(literal 1/4 binary64) D))))
(/.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 l h))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (neg.f64 h) (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 h l))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 M))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (/.f64 h l) (*.f64 M (*.f64 #s(literal 1/4 binary64) D)))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D)) M)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 l) d) (*.f64 (neg.f64 h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 l h) d) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l d) (*.f64 h (*.f64 M (*.f64 #s(literal 1/4 binary64) D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (neg.f64 l)) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (/.f64 l h)) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l d) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 (/.f64 h l) (*.f64 #s(literal 1/4 binary64) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d)))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 D l) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1 binary64) (*.f64 l d)))
(*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) (/.f64 #s(literal -1 binary64) l))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) l))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (/.f64 D l))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) l))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M (/.f64 D l)))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) l))
(*.f64 M (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 D l)))
(*.f64 D (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) l))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 l d)))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) l) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l))) (neg.f64 d))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l)) d)
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 (*.f64 l d)))
(/.f64 (/.f64 D l) (*.f64 d (/.f64 #s(literal 2 binary64) M)))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 l d))
(/.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) (neg.f64 l))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D))))
(/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (/.f64 l D))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) l)
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l d) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)))
(neg.f64 (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) l))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 l)) (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) l))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) l))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D))) #s(literal -1 binary64)))
(*.f64 (exp.f64 (log.f64 (*.f64 M #s(literal 1/2 binary64)))) (exp.f64 (log.f64 (/.f64 D d))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 2 binary64) d)))))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)) (/.f64 M d))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 M) D) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)) M)
(*.f64 (pow.f64 (/.f64 M d) #s(literal 1 binary64)) (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 M d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)))
(*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) M)
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))
(*.f64 (/.f64 D d) (*.f64 M #s(literal 1/2 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D d))
(*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (/.f64 M d) (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)))
(*.f64 (/.f64 M d) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)))
(*.f64 M (*.f64 (/.f64 #s(literal 1/2 binary64) d) D))
(*.f64 M (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 M d))
(*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 d (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 D (/.f64 M d)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D))) d)
(/.f64 (neg.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M))) d)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) d)
(/.f64 (neg.f64 (/.f64 (*.f64 M D) d)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 D #s(literal 1/2 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (exp.f64 (log.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) (exp.f64 (log.f64 d)))
(/.f64 (exp.f64 (log.f64 (*.f64 (neg.f64 M) D))) (exp.f64 (log.f64 (*.f64 #s(literal -2 binary64) d))))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) d))))
(/.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 d))
(/.f64 (/.f64 (*.f64 M D) d) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) d)
(/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) M))
(/.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 d D))
(/.f64 (*.f64 (neg.f64 M) D) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 M (/.f64 (*.f64 #s(literal 2 binary64) d) D))
(/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d M))
(/.f64 D (*.f64 d (/.f64 #s(literal 2 binary64) M)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 M (/.f64 D d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 #s(literal -1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) d)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 D #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(neg.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) d)) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) D) (*.f64 (*.f64 h (*.f64 M D)) M)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l)))) h)
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (*.f64 #s(literal 1/8 binary64) h))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))
(*.f64 (*.f64 (*.f64 h (*.f64 M D)) M) (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) D) M) M)
(*.f64 (*.f64 M D) (*.f64 M (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h)))
(*.f64 (*.f64 (*.f64 M M) D) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) (*.f64 (*.f64 M M) D))
(*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) (*.f64 (*.f64 h (*.f64 M D)) M))
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) (*.f64 (*.f64 h (*.f64 M D)) M)))
(*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) (*.f64 (*.f64 #s(literal 1/8 binary64) h) (*.f64 (*.f64 M M) D)))
(*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 h (*.f64 M D)) M)))
(*.f64 M (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) D) M))
(*.f64 h (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) (*.f64 (*.f64 M M) D)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) D) (*.f64 (*.f64 h (*.f64 M D)) M))) (*.f64 (*.f64 l d) (neg.f64 d)))
(/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) D) (*.f64 (*.f64 h (*.f64 M D)) M)) (*.f64 (*.f64 d d) l))
(/.f64 (*.f64 (*.f64 (*.f64 M M) D) (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l)))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 h (*.f64 M D)) M) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 #s(literal 1/8 binary64) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 #s(literal 1/8 binary64) D) (*.f64 (*.f64 h (*.f64 M D)) M))))
(*.f64 (/.f64 (/.f64 D l) d) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)) (/.f64 D d))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (/.f64 D l))
(*.f64 (/.f64 D (*.f64 l d)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 D (*.f64 d d)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (neg.f64 (/.f64 D l)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 d d))))
(*.f64 (/.f64 D l) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)) (pow.f64 (/.f64 #s(literal 1 binary64) D) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)) D)
(*.f64 (/.f64 #s(literal 1 binary64) l) (pow.f64 (/.f64 (*.f64 d d) D) #s(literal -1 binary64)))
(*.f64 (neg.f64 D) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) l) D))))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 D) (*.f64 (*.f64 d d) l)))
(*.f64 D (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 #s(literal 1 binary64) (/.f64 D (*.f64 (*.f64 d d) l)))
(pow.f64 (/.f64 (*.f64 (*.f64 d d) l) D) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (/.f64 D l) d)) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 D (*.f64 l d))) (neg.f64 d))
(/.f64 (neg.f64 (/.f64 D (*.f64 d d))) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (/.f64 D l))) (neg.f64 (neg.f64 (*.f64 d d))))
(/.f64 (/.f64 (/.f64 D l) d) d)
(/.f64 (/.f64 D (*.f64 l d)) d)
(/.f64 (/.f64 D (*.f64 d d)) l)
(/.f64 (neg.f64 (/.f64 D l)) (neg.f64 (*.f64 d d)))
(/.f64 (/.f64 D l) (*.f64 d d))
(/.f64 (neg.f64 D) (*.f64 (*.f64 l d) (neg.f64 d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) l) D)))
(/.f64 D (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 (/.f64 D l) d)))
(/.f64 #s(literal 1 binary64) (/.f64 d (/.f64 D (*.f64 l d))))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 D (*.f64 d d))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) l) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) D))
(neg.f64 (/.f64 (neg.f64 D) (*.f64 (*.f64 d d) l)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 l d) (neg.f64 d))) (/.f64 (neg.f64 D) (*.f64 (*.f64 d d) l)))
(-.f64 #s(literal 0 binary64) (/.f64 (neg.f64 D) (*.f64 (*.f64 d d) l)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 d d) l) D)) #s(literal -1 binary64)))
(*.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) l))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 h)) (/.f64 #s(literal -1 binary64) l))
(*.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (/.f64 #s(literal -1 binary64) l))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 1 binary64))
(*.f64 (/.f64 h l) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 h l))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) (*.f64 (/.f64 h l) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64))))
(pow.f64 (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)))) l)
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 h))) l)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h))) l)
(/.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64))) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 h)) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) l)
(/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (neg.f64 (/.f64 l h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h))))
(/.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 l h))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) (/.f64 l (*.f64 #s(literal 1/2 binary64) h)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 h))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)))
(*.f64 (exp.f64 (log.f64 (*.f64 M #s(literal 1/2 binary64)))) (exp.f64 (log.f64 (/.f64 D d))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 2 binary64) d)))))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)) (/.f64 M d))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 M) D) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)) M)
(*.f64 (pow.f64 (/.f64 M d) #s(literal 1 binary64)) (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 M d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)))
(*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) M)
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))
(*.f64 (/.f64 D d) (*.f64 M #s(literal 1/2 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D d))
(*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (/.f64 M d) (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)))
(*.f64 (/.f64 M d) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)))
(*.f64 M (*.f64 (/.f64 #s(literal 1/2 binary64) d) D))
(*.f64 M (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 M d))
(*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 d (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 D (/.f64 M d)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D))) d)
(/.f64 (neg.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M))) d)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) d)
(/.f64 (neg.f64 (/.f64 (*.f64 M D) d)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 D #s(literal 1/2 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (exp.f64 (log.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) (exp.f64 (log.f64 d)))
(/.f64 (exp.f64 (log.f64 (*.f64 (neg.f64 M) D))) (exp.f64 (log.f64 (*.f64 #s(literal -2 binary64) d))))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) d))))
(/.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 d))
(/.f64 (/.f64 (*.f64 M D) d) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) d)
(/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) M))
(/.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 d D))
(/.f64 (*.f64 (neg.f64 M) D) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 M (/.f64 (*.f64 #s(literal 2 binary64) d) D))
(/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d M))
(/.f64 D (*.f64 d (/.f64 #s(literal 2 binary64) M)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 M (/.f64 D d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 #s(literal -1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) d)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 D #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(neg.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) d)) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 h))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))) (-.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))) (-.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) d)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (sqrt.f64 (*.f64 (/.f64 d l) d)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (/.f64 d l) d)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) d))) (sqrt.f64 h))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l)))) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (*.f64 l l))) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) #s(literal 3 binary64))) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (pow.f64 (*.f64 (/.f64 d h) d) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (*.f64 (/.f64 d h) d) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h l)) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d l) d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 (/.f64 d l) h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(+.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))))
(+.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 d d))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 M D)))
(*.f64 (pow.f64 (/.f64 M (*.f64 #s(literal 4 binary64) d)) #s(literal -1 binary64)) (pow.f64 (/.f64 D d) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 D (*.f64 #s(literal 4 binary64) d)) #s(literal -1 binary64)) (/.f64 d M))
(*.f64 (pow.f64 (*.f64 M #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 D (*.f64 d d)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 D (*.f64 d d)) #s(literal -1 binary64)) (pow.f64 (*.f64 M #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 d d))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 M D)))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) M) (/.f64 #s(literal 1 binary64) D))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 d d) M)) (/.f64 #s(literal 1 binary64) D))
(*.f64 (*.f64 (/.f64 #s(literal 4 binary64) D) (*.f64 d d)) (/.f64 #s(literal 1 binary64) M))
(*.f64 (/.f64 #s(literal 1 binary64) D) (pow.f64 (/.f64 M (*.f64 #s(literal 4 binary64) (*.f64 d d))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) M) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) D))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) d) M) (/.f64 d D))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) d) D) (/.f64 d M))
(*.f64 (/.f64 #s(literal 4 binary64) M) (/.f64 (*.f64 d d) D))
(*.f64 (/.f64 (*.f64 d d) D) (/.f64 #s(literal 4 binary64) M))
(*.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) D)) (/.f64 #s(literal 1 binary64) (neg.f64 M)))
(*.f64 (*.f64 d (/.f64 d (*.f64 M D))) #s(literal 4 binary64))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) D) (/.f64 #s(literal 1 binary64) M))
(*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 d d))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) (*.f64 #s(literal 4 binary64) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 d d) M) (/.f64 #s(literal 4 binary64) D))
(*.f64 (/.f64 #s(literal 4 binary64) D) (/.f64 (*.f64 d d) M))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 d d)) (/.f64 #s(literal -1 binary64) (*.f64 M D)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 d d)) (*.f64 M D)))
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D))) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (/.f64 #s(literal 1 binary64) (*.f64 M D)))
(*.f64 #s(literal 4 binary64) (*.f64 d (/.f64 d (*.f64 M D))))
(*.f64 (*.f64 d d) (/.f64 #s(literal 4 binary64) (*.f64 M D)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D))))
(pow.f64 (*.f64 (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d))) M) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D))) #s(literal 1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) M)) (neg.f64 D))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 d d) M))) (neg.f64 D))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 4 binary64) D) (*.f64 d d))) (neg.f64 M))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) D))) M)
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) M) D)
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 d d) M)) D)
(/.f64 (*.f64 (/.f64 #s(literal 4 binary64) D) (*.f64 d d)) M)
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) d) D) (/.f64 M d))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) D)) (neg.f64 M))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) D) M)
(/.f64 (/.f64 (*.f64 d d) M) (*.f64 #s(literal 1/4 binary64) D))
(/.f64 (/.f64 #s(literal 4 binary64) D) (/.f64 M (*.f64 d d)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 d d)) (*.f64 M D)) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 d d)) (*.f64 (neg.f64 M) D))
(/.f64 #s(literal -1 binary64) (/.f64 (*.f64 M D) (*.f64 #s(literal -4 binary64) (*.f64 d d))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) d) (/.f64 d (*.f64 M D))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 M D))
(/.f64 #s(literal 4 binary64) (*.f64 D (/.f64 M (*.f64 d d))))
(/.f64 #s(literal 1 binary64) (/.f64 D (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) M)))
(/.f64 #s(literal 1 binary64) (/.f64 D (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 d d) M))))
(/.f64 #s(literal 1 binary64) (/.f64 M (*.f64 (/.f64 #s(literal 4 binary64) D) (*.f64 d d))))
(/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal -4 binary64) (*.f64 d d)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d))) M))
(neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 d d)) (*.f64 M D)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (neg.f64 M) D)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 d d)) (*.f64 M D)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 d d)) (*.f64 M D)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 D (*.f64 #s(literal 4 binary64) (*.f64 d d))) M)) #s(literal -1 binary64)))
(*.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 #s(literal -1 binary64) l))
(*.f64 (*.f64 h (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) h)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 M D) (/.f64 h l)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D)
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 M D)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 h l))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D) M)
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (neg.f64 h) l) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) #s(literal 1 binary64))
(*.f64 (*.f64 M D) (*.f64 (/.f64 h l) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 M D))
(*.f64 (/.f64 h l) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))
(*.f64 M (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) D))
(*.f64 D (*.f64 M (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h l) (*.f64 M D)))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) l)
(/.f64 (neg.f64 (*.f64 h (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) h))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 M D))) (neg.f64 l))
(/.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 l))
(/.f64 (*.f64 h (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) l)
(/.f64 (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) h)) l)
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64))) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 M D)) l)
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 l h))
(/.f64 (*.f64 (/.f64 (neg.f64 h) l) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) M) D) #s(literal 1 binary64))
(/.f64 (*.f64 M D) (/.f64 l (*.f64 #s(literal 1/2 binary64) h)))
(/.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 M D)))
(/.f64 (/.f64 h l) (/.f64 #s(literal 2 binary64) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (neg.f64 h) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 h (*.f64 (*.f64 M #s(literal 1/2 binary64)) D))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 M D) (*.f64 #s(literal 1/2 binary64) h))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 #s(literal 1/2 binary64) h) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) (/.f64 l (*.f64 #s(literal 1/2 binary64) h))))
(neg.f64 (*.f64 (/.f64 (neg.f64 h) l) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (neg.f64 h) l) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))

eval312.0ms (1.5%)

Memory
19.5MiB live, 706.3MiB allocated
Compiler

Compiled 95 377 to 5 254 computations (94.5% saved)

prune677.0ms (3.3%)

Memory
-146.5MiB live, 732.3MiB allocated
Pruning

50 alts after pruning (50 fresh and 0 done)

PrunedKeptTotal
New2 334492 383
Fresh18119
Picked505
Done000
Total2 357502 407
Accuracy
94.6%
Counts
2 407 → 50
Alt Table
Click to see full alt table
StatusAccuracyProgram
39.6%
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
39.6%
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
52.1%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
53.3%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
50.7%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
52.2%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
25.2%
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (*.f64 (/.f64 d l) d))) (sqrt.f64 h))
▶31.5%
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
24.5%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))))
52.1%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
25.2%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (*.f64 (/.f64 d l) d)))))
34.4%
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
36.8%
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
52.9%
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
68.4%
(*.f64 (*.f64 (pow.f64 (pow.f64 (/.f64 h d) #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 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
49.3%
(*.f64 (*.f64 (pow.f64 (pow.f64 (/.f64 h d) #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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
50.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) D) (*.f64 (*.f64 h (*.f64 M D)) M)) (*.f64 (*.f64 d d) l)))))
29.5%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
28.4%
(*.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 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))))
41.4%
(*.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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
36.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
28.4%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
69.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
36.6%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
55.4%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))))
▶73.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
69.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 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
67.8%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
3.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d l))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
28.7%
(*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
33.0%
(*.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 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d)) #s(literal 1/2 binary64)) h) l)))
43.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 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
40.7%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
38.9%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)) (*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64)))) (/.f64 h l))))
▶11.1%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
25.3%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
39.4%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶39.4%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
38.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
1.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (pow (/ d l) (/ 1 2)) (neg.f64 (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))))
51.5%
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
31.7%
(*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))))
28.7%
(*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
20.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 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
17.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 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (*.f64 l h)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l)))
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 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h))
13.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 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))))
15.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
▶30.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 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
24.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 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
Compiler

Compiled 3 794 to 2 322 computations (38.8% saved)

simplify122.0ms (0.6%)

Memory
-2.5MiB live, 186.7MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff320
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1984
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)))
cost-diff4800
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
cost-diff0
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
cost-diff0
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff5824
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff0
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))
cost-diff0
(sqrt.f64 d)
cost-diff0
(*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))))
cost-diff0
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
cost-diff0
(/.f64 #s(literal 1 binary64) (*.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-diff384
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1088
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
cost-diff5824
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Rules
8 304×lower-*.f32
8 240×lower-*.f64
4 614×lower-/.f32
4 586×lower-/.f64
2 118×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
086842
0148834
1274808
2807800
34521800
08980793
Stop Event
1×iter limit
1×node limit
1×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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l)))
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d h)
d
h
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))
(/.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)
M
D
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
(*.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)
(/.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 (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
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))))
(sqrt.f64 d)
d
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))
#s(literal 1 binary64)
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M)
(*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h)
(*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l)))
#s(literal 1/8 binary64)
(/.f64 D (*.f64 (*.f64 d d) l))
D
(*.f64 (*.f64 d d) l)
(*.f64 d d)
l
h
M
(*.f64 M D)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 h)
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 d l)
l
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(*.f64 h #s(literal -1/8 binary64))
#s(literal -1/8 binary64)
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 M M) D)
(*.f64 M M)
M
D
(/.f64 D (*.f64 (*.f64 d d) l))
(*.f64 (*.f64 d d) l)
(*.f64 d d)
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 #s(literal 1 binary64) (sqrt.f64 l))
#s(literal 1 binary64)
(sqrt.f64 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)))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 2 binary64)
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(*.f64 M D)
M
D
(*.f64 #s(literal 2 binary64) d)
(/.f64 h l)
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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 D (*.f64 (/.f64 M d) h)) (*.f64 #s(literal -1/4 binary64) D)) (*.f64 #s(literal 1/2 binary64) (/.f64 M (*.f64 l d))) #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))) (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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))
(fma.f64 (*.f64 (*.f64 D (*.f64 (/.f64 M d) h)) (*.f64 #s(literal -1/4 binary64) D)) (*.f64 #s(literal 1/2 binary64) (/.f64 M (*.f64 l d))) #s(literal 1 binary64))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) #s(literal 1/4 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D (*.f64 l d))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D (*.f64 l d)))
(*.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)
M
D
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
(*.f64 (*.f64 (*.f64 (/.f64 M d) h) #s(literal 1/4 binary64)) D)
(*.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)
(/.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 (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
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) D) #s(literal 1/8 binary64)) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) h)))) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))))
(*.f64 (*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) D) #s(literal 1/8 binary64)) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) h)))))
(sqrt.f64 d)
d
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) D) #s(literal 1/8 binary64)) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) h)))) (sqrt.f64 (/.f64 d l)))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))))
(-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) D) #s(literal 1/8 binary64)) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) h))))
#s(literal 1 binary64)
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) D) #s(literal 1/8 binary64)) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) h)))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) #s(literal 1/8 binary64)) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) h))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M)
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M)
(*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h)
(*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h)
(*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l)))
(*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64))
#s(literal 1/8 binary64)
(/.f64 D (*.f64 (*.f64 d d) l))
D
(*.f64 (*.f64 d d) l)
(*.f64 d d)
l
h
M
(*.f64 M D)
(*.f64 D M)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 h)
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
(*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) D) (*.f64 M M))) (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) D) (*.f64 M M)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) D) (*.f64 M M))
(*.f64 h #s(literal -1/8 binary64))
(*.f64 #s(literal -1/8 binary64) h)
#s(literal -1/8 binary64)
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) D) M)
(*.f64 (*.f64 M M) D)
(*.f64 M M)
M
D
(/.f64 D (*.f64 (*.f64 d d) l))
(*.f64 (*.f64 d d) l)
(*.f64 d d)
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (/.f64 D (*.f64 #s(literal 2 binary64) d)) (*.f64 M M))) (/.f64 D (*.f64 #s(literal -2 binary64) d)) #s(literal 1 binary64)) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)))
(/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 l))
#s(literal 1 binary64)
(sqrt.f64 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 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (/.f64 D (*.f64 #s(literal 2 binary64) d)) (*.f64 M M))) (/.f64 D (*.f64 #s(literal -2 binary64) d)) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (/.f64 D (*.f64 #s(literal 2 binary64) d)) (*.f64 M M))) (/.f64 D (*.f64 #s(literal 2 binary64) d)))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 D (*.f64 #s(literal 2 binary64) d))) M) (/.f64 D (*.f64 #s(literal 2 binary64) d))) M)
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 2 binary64)
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 M M) (/.f64 D (*.f64 #s(literal 2 binary64) d))) (/.f64 D (*.f64 #s(literal 2 binary64) d)))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(*.f64 (/.f64 M (*.f64 #s(literal 2 binary64) d)) D)
(*.f64 M D)
(*.f64 D M)
M
D
(*.f64 #s(literal 2 binary64) d)
(/.f64 h l)

localize250.0ms (1.2%)

Memory
58.9MiB live, 427.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.19921875
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
accuracy2.746398853873022
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
accuracy3.9174321183183665
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
accuracy7.000125111822401
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy3.323988928157656
(/.f64 D (*.f64 (*.f64 d d) l))
accuracy7.11470944227297
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy7.97125841086699
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
accuracy17.733145510004373
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))
accuracy3.323988928157656
(/.f64 D (*.f64 (*.f64 d d) l))
accuracy3.592035072428835
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M)
accuracy4.166436297336619
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))
accuracy7.11470944227297
(sqrt.f64 (/.f64 d l))
accuracy0.1015625
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
accuracy0.2906711441300419
(/.f64 #s(literal 1 binary64) (*.f64 l h))
accuracy6.83377209928156
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy15.667405432220868
#s(approx (* (* (pow (/ d h) (/ 1 2)) (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.2867268941074688
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
accuracy3.485353974629821
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
accuracy7.11470944227297
(sqrt.f64 (/.f64 d l))
accuracy8.921605440297713
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
Samples
94.0ms136×0valid
85.0ms120×0invalid
Compiler

Compiled 755 to 71 computations (90.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 121.0ms
ival-mult: 70.0ms (57.9% of total)
ival-div: 23.0ms (19% of total)
ival-pow: 11.0ms (9.1% of total)
ival-sqrt: 8.0ms (6.6% of total)
ival-pow2: 6.0ms (5% of total)
ival-sub: 2.0ms (1.7% of total)
exact: 1.0ms (0.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series203.0ms (1%)

Memory
-2.2MiB live, 309.4MiB allocated
Counts
28 → 1 152
Calls
Call 1
Inputs
#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (/.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (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 #s(literal 1 binary64) (*.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (*.f64 l h)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<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 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())
#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())
#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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 (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 (/ 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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 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 (/ 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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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 (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 (/ 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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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 (* 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 (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/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 (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/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 (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf M) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (* -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 (/ 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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d 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)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<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) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (* 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 (/ 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 (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d 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 (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (* (* 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 (/ 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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d 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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf l) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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 (* 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 (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/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 (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/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 (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf D) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf D) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/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 (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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/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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor 0 d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor 0 d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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 (* 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 (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) #<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 (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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 (* 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor inf d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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/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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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 (* (* 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 (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 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 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (patch (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (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 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) (patch (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))) #<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 (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (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 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) (patch (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* M h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (patch (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt (/ D (* (pow d 2) l)) (taylor -inf d) (#s(alt (/.f64 D (*.f64 (*.f64 d d) l)) (patch (/.f64 D (*.f64 (*.f64 d d) l)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)) (taylor -inf d) (#s(alt (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (patch (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 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/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) (patch (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
Calls

15 calls:

TimeVariablePointExpression
24.0ms
D
@0
((pow (/ d h) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (/ (* (* (/ 1/2 d) M) D) l) (* (* (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))) (/ 1 (* l h)) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (pow (/ d l) (/ 1 2)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (pow (/ (* M D) (* 2 d)) 2) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (* (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (* M D)) (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (/ D (* (* d d) l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (* M M) D) (/ D (* (* d d) l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))
14.0ms
d
@0
((pow (/ d h) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (/ (* (* (/ 1/2 d) M) D) l) (* (* (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))) (/ 1 (* l h)) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (pow (/ d l) (/ 1 2)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (pow (/ (* M D) (* 2 d)) 2) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (* (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (* M D)) (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (/ D (* (* d d) l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (* M M) D) (/ D (* (* d d) l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))
11.0ms
M
@0
((pow (/ d h) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (/ (* (* (/ 1/2 d) M) D) l) (* (* (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))) (/ 1 (* l h)) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (pow (/ d l) (/ 1 2)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (pow (/ (* M D) (* 2 d)) 2) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (* (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (* M D)) (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (/ D (* (* d d) l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (* M M) D) (/ D (* (* d d) l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))
10.0ms
l
@inf
((pow (/ d h) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (/ (* (* (/ 1/2 d) M) D) l) (* (* (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))) (/ 1 (* l h)) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (pow (/ d l) (/ 1 2)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (pow (/ (* M D) (* 2 d)) 2) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (* (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (* M D)) (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (/ D (* (* d d) l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (* M M) D) (/ D (* (* d d) l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))
9.0ms
l
@-inf
((pow (/ d h) (/ 1 2)) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ 1 2) (/ (* (* (/ 1/2 d) M) D) l) (* (* (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))) (/ 1 (* l h)) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (pow (/ d l) (/ 1 2)) (* (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (pow (/ (* M D) (* 2 d)) 2) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (* (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (* M D)) (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (/ D (* (* d d) l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (* M M) D) (/ D (* (* d d) l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))

simplify211.0ms (1%)

Memory
-33.6MiB live, 204.0MiB allocated
Algorithm
1×egg-herbie
Rules
8 210×lower-*.f64
8 210×lower-*.f32
4 216×lower-fma.f64
4 216×lower-fma.f32
3 138×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
029717472
188917110
2325517008
3715916915
0846616630
Stop Event
1×iter limit
1×node limit
Counts
1 152 → 1 152
Calls
Call 1
Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d 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))
(* 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)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (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 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (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)))))))
(* 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))))
(* 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) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
1
(+ 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/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))))))
(* 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)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 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/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d 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)) 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))))
(* 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) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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/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)))))))))
(* (* 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))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) 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)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 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 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (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)))))))
(* 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/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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
1
(+ 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))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* -1/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)) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (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)) 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/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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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)))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* -1/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)) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (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)) 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/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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* -1/8 (/ (* (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)))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (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)))))
(/ (+ (* -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)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 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))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (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))
(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))))
(* 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))
(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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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)))))
(/ (+ (* -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/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 (* 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)))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (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)))))))
(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))))
(* 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))
(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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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)))
(* 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 (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))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 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 (/ 1 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (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)))
(* (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))))
(* 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))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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)))
(* 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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 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 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (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)))))))
(* 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/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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* -1/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)) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (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)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* -1/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)) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (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)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (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))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* -1/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) h)) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(sqrt d)
(sqrt d)
(sqrt d)
(sqrt 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))
(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/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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d 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))
(* 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 (* 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 l)))
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(sqrt d)
(sqrt d)
(sqrt d)
(sqrt d)
(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))))))))
(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))))
(* 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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* -1 (* (* 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)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt d) (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 (* (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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* 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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -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 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
(/ D (* (pow d 2) l))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(/ (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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)))))
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/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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)))
(/ 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))
(* 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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) 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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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)
(* 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) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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 (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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)))
(/ 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/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 (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) 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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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)
(* 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) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* -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 (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) 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)))))
(*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.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 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) 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))))
(* (* 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))))
(/ 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/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 (*.f64 (*.f64 l l) l)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) 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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 (*.f64 (*.f64 l l) l)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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)
(* 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) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* -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 (*.f64 (*.f64 l l) l)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) 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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.f64 M M) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.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 #s(literal -1/8 binary64) h) (*.f64 D (/.f64 D (*.f64 (*.f64 d d) l)))) (*.f64 M M) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (/ 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 (* 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/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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) (/.f64 D d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) l)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) (/.f64 D d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) l)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) (/.f64 D d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) l)) 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l 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 (*.f64 (*.f64 d d) d))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (*.f64 d (*.f64 l l)) l))) (*.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 (*.f64 (*.f64 d d) d))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (*.f64 d (*.f64 l l)) l))) (*.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 (*.f64 (*.f64 d d) d))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (*.f64 d (*.f64 l l)) l))) (*.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/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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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)
(* 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))
(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 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* -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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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)
(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 (* 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))
(* 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) 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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (sqrt.f64 (/.f64 d l)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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))))
(*.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))
(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 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 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))))
(+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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))))
(/ 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))
(* (* 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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 l)))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 h (/.f64 (*.f64 M M) d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (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 D D)) (*.f64 M M))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (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 D D)) (*.f64 M M))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (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 D D)) (*.f64 M M))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (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)))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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))))
(* 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))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) 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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) 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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) 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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 h #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (*.f64 M M) D) D)) (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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 d d) d) (*.f64 (*.f64 l l) l)))))
(/ (+ (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (*.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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.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))))
(*.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))
(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))
(*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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/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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 M M)) (*.f64 (*.f64 d d) (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))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) d)
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) d)
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.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))))
(*.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))
(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))
(*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (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/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(*.f64 (/.f64 (*.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l 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 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 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 (* (* 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 binary64))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M (/.f64 M (*.f64 d d))) h) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 binary64))) 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 (pow (sqrt -1) 2)) (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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d d)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1/4 binary64) (*.f64 d 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 (pow (sqrt -1) 2)) (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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (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 (* (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 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/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* D (* M h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
(/ D (* (pow d 2) l))
(/.f64 D (*.f64 (*.f64 d d) l))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) #s(literal 1 binary64))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(* 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 (* (* 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M (*.f64 d d)))) #s(literal -1/8 binary64))) d)

rewrite227.0ms (1.1%)

Memory
-10.5MiB live, 259.6MiB allocated
Rules
4 288×lower-/.f32
4 260×lower-/.f64
4 098×lower-*.f32
4 042×lower-*.f64
1 928×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
082457
0139439
1387418
22223402
08327398
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
28 → 1 304
Calls
Call 1
Inputs
(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l))))
(sqrt.f64 d)
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))
(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(sqrt.f64 (/.f64 d l))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M)
(/.f64 D (*.f64 (*.f64 d d) l))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) 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 M D) (*.f64 #s(literal 2 binary64) d))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Outputs
(*.f64 (pow.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h))))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d)))))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (/.f64 d h)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 d) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(pow.f64 (*.f64 (/.f64 d h) (/.f64 d h)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1 binary64))
(pow.f64 (/.f64 h d) #s(literal -1/2 binary64))
(pow.f64 (/.f64 d h) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal -1 binary64))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 h d)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d)))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(sqrt.f64 (/.f64 d h))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 h))) (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(-.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 h) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) D)) #s(literal -1 binary64)) (*.f64 (/.f64 M d) h))
(*.f64 (*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 h d))
(*.f64 (*.f64 (/.f64 (neg.f64 M) d) (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 h))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d))))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (neg.f64 M) d) (*.f64 #s(literal 1/4 binary64) D)) h))
(*.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) h)
(*.f64 (/.f64 M d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) D) h)) #s(literal -1 binary64)))
(*.f64 (/.f64 M d) (*.f64 (*.f64 #s(literal 1/4 binary64) D) h))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 M d) h)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) h)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) h))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 h (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h) d)
(/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 (/.f64 d h)))
(/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 d h))
(/.f64 (*.f64 (/.f64 (neg.f64 M) d) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 #s(literal -1 binary64) h))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d)))
(/.f64 (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 M d) h)))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d))
(/.f64 h (/.f64 d (*.f64 M (*.f64 #s(literal 1/4 binary64) D))))
(neg.f64 (*.f64 (*.f64 (/.f64 (neg.f64 M) d) (*.f64 #s(literal 1/4 binary64) D)) h))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) h)) (*.f64 (*.f64 (/.f64 (neg.f64 M) d) (*.f64 #s(literal 1/4 binary64) D)) h))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (/.f64 (neg.f64 M) d) (*.f64 #s(literal 1/4 binary64) D)) h))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) d)) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(*.f64 (pow.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1 binary64) (*.f64 l d)))
(*.f64 (/.f64 D l) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))
(*.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) (/.f64 #s(literal -1 binary64) l))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) l))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (/.f64 D l))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) l))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M (/.f64 D l)))
(*.f64 M (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 D l)))
(*.f64 D (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) l))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 l d)))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) l) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 (*.f64 l d)))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l)) d)
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 l d))
(/.f64 (/.f64 D l) (*.f64 d (/.f64 #s(literal 2 binary64) M)))
(/.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) (neg.f64 l))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
(/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (/.f64 l D))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l d) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)))
(neg.f64 (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) l))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 l)) (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) l))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) l))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) d)) (*.f64 M D))) #s(literal -1 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(*.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
(*.f64 (/.f64 d (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (*.f64 d (/.f64 d h))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 l h)) (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))) (sqrt.f64 h))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 d (/.f64 d h)))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d h) d))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (neg.f64 (/.f64 d (sqrt.f64 l)))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)))
(/.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 l (/.f64 h d)))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 h d) l))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l))))))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 l (/.f64 h d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 d (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 (/.f64 d h) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))) (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (/.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 h d) l)) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l (/.f64 h d))) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 l h)) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 (*.f64 l h)) #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (neg.f64 h) l))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 l h))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 l h)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 l h) #s(literal -1/4 binary64)) (pow.f64 (*.f64 l h) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (*.f64 l h)) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 l h) #s(literal -1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (*.f64 (neg.f64 h) l))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 l))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(fabs.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 l h))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 l h))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal -1 binary64) h))
(*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 l h)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(pow.f64 (*.f64 (sqrt.f64 (*.f64 l h)) (sqrt.f64 (*.f64 l h))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 l h) (*.f64 l h)) #s(literal -1/2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (*.f64 l h)) #s(literal -2 binary64))
(pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) #s(literal 1 binary64))
(pow.f64 (*.f64 l h) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) h)
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l)) (neg.f64 h))
(/.f64 (/.f64 #s(literal 1 binary64) l) h)
(/.f64 (/.f64 #s(literal -1 binary64) h) (neg.f64 l))
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 h) l))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (sqrt.f64 (*.f64 l h)))
(/.f64 (/.f64 #s(literal 1 binary64) h) l)
(/.f64 #s(literal 1 binary64) (*.f64 l h))
(neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 l h)))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(-.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (*.f64 l h)))
(exp.f64 (fma.f64 (neg.f64 (log.f64 (*.f64 l h))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 (*.f64 l h))) #s(literal 1/2 binary64))))
(exp.f64 (neg.f64 (log.f64 (*.f64 l h))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d (*.f64 l h)))) (sqrt.f64 d))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 (/.f64 d (*.f64 l h))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(*.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (neg.f64 (sqrt.f64 h))))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d (*.f64 l h)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d (*.f64 l h)))) (sqrt.f64 d)))
(pow.f64 (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) (neg.f64 (sqrt.f64 h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 h))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d (*.f64 l h))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))))
(neg.f64 (/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (neg.f64 (sqrt.f64 h))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 h))) (/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (neg.f64 (sqrt.f64 h))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (neg.f64 (sqrt.f64 h))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) #s(literal 1 binary64))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 d))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (/.f64 d (sqrt.f64 l)))
(*.f64 (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d))) (neg.f64 (sqrt.f64 l)))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (sqrt.f64 l))
(/.f64 (/.f64 d (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d))))
(neg.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))))
(-.f64 #s(literal 0 binary64) (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))))
(*.f64 (pow.f64 d #s(literal 1/4 binary64)) (pow.f64 d #s(literal 1/4 binary64)))
(*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 d)))
(*.f64 (sqrt.f64 d) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 d))
(pow.f64 (exp.f64 (log.f64 d)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 d d) #s(literal 1/4 binary64))
(pow.f64 d #s(literal 1/2 binary64))
(neg.f64 (neg.f64 (sqrt.f64 d)))
(sqrt.f64 d)
(-.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 d)))
(exp.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 l) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 l) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) (sqrt.f64 l))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 l))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l)))
(/.f64 (-.f64 (/.f64 d l) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))) (-.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))))
(/.f64 (-.f64 (/.f64 d l) (*.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))) (-.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l)))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 d l)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) #s(literal 3 binary64))) (+.f64 (/.f64 d l) (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) (*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 d l)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))) #s(literal 3 binary64))) (+.f64 (/.f64 d l) (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))) (neg.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))) (neg.f64 (*.f64 (sqrt.f64 l) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 l) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 d))) (neg.f64 (*.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) (sqrt.f64 l))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))) (sqrt.f64 d))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 l))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 (/.f64 d l))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64)))) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d))) (neg.f64 (sqrt.f64 l)))
(/.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))))) (*.f64 (sqrt.f64 l) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64))))
(/.f64 (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 l) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 d)) (*.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) (sqrt.f64 l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))) (sqrt.f64 d)) (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 l)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 l))
(/.f64 (sqrt.f64 (/.f64 d l)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 l) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 l) (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 d) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) (sqrt.f64 l)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) (+.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 l)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)) #s(literal 3 binary64))) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d))))
(fma.f64 (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) l) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) l) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(fma.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(+.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 (/.f64 d l))))
(+.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)))))
(*.f64 (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) l) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 l)) (*.f64 (sqrt.f64 d) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(sqrt.f64 (/.f64 d l))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 l))) (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 l))))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 l) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (fma.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64) (*.f64 (log.f64 d) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 d) #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (sqrt.f64 d) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (/.f64 d (sqrt.f64 l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l)))))
(*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h)))))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l)))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (/.f64 d (sqrt.f64 l)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h)))) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(/.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
(/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (/.f64 d (sqrt.f64 l)))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(*.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
(*.f64 (/.f64 d (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (*.f64 d (/.f64 d h))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 l h)) (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))) (sqrt.f64 h))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 d (/.f64 d h)))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d h) d))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (neg.f64 (/.f64 d (sqrt.f64 l)))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)))
(/.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 l (/.f64 h d)))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 h d) l))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l))))))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 l (/.f64 h d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 d (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 (/.f64 d h) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))) (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (/.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 h d) l)) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l (/.f64 h d))) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) (*.f64 (*.f64 D #s(literal 1/2 binary64)) M)) (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 #s(literal 1 binary64) d)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) D)) (*.f64 M M))
(*.f64 (*.f64 (/.f64 M d) (/.f64 M d)) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))) (*.f64 (/.f64 M d) (/.f64 M d)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 D D))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 M #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 D d))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 M D)) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) M) #s(literal 1 binary64)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal -1/2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 D d) (/.f64 D d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 2 binary64)) (*.f64 M M))
(*.f64 (pow.f64 (/.f64 M d) #s(literal 2 binary64)) (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (/.f64 M d) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 2 binary64)) (*.f64 D D))
(*.f64 (*.f64 D D) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))
(*.f64 (*.f64 D D) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (neg.f64 D) M)) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 M #s(literal 1/2 binary64))) (/.f64 D d))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 M D)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) M) (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 #s(literal 1 binary64) d)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (neg.f64 D) M)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 #s(literal -2 binary64) d))))
(*.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 #s(literal 2 binary64) d))))
(*.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -2 binary64) d) d)))
(*.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 M D)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) d))))
(*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) d) d)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 (neg.f64 D) M)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal -2 binary64) d))))
(*.f64 (*.f64 (/.f64 D d) (/.f64 D d)) (*.f64 #s(literal 1/4 binary64) (*.f64 M M)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 M M)) (*.f64 (/.f64 D d) (/.f64 D d)))
(*.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal -1/2 binary64) d)) (*.f64 (*.f64 (*.f64 M M) D) D))
(*.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64))) (*.f64 M M))
(*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 d (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) d)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d))))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 d d))))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (/.f64 #s(literal -1/2 binary64) d)))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)) (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (pow.f64 (*.f64 (/.f64 D d) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 1 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 (*.f64 (neg.f64 D) M) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 (*.f64 (neg.f64 D) M) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal -2 binary64) d))))
(*.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))
(*.f64 (*.f64 M M) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) D)))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 2 binary64)))
(*.f64 (*.f64 M M) (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) #s(literal 1/2 binary64))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) d))))
(*.f64 (*.f64 M D) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 M (pow.f64 (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 1 binary64)))
(*.f64 M (*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 d (*.f64 M D)) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal -2 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))) (*.f64 #s(literal 2 binary64) d))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))) (*.f64 #s(literal -2 binary64) d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (neg.f64 D) M))) (*.f64 #s(literal 2 binary64) d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 M D))) (*.f64 #s(literal -2 binary64) d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64))) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (neg.f64 D) M))) (neg.f64 (*.f64 d (*.f64 #s(literal -2 binary64) d))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 M D))) (neg.f64 (*.f64 d (*.f64 #s(literal 2 binary64) d))))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 M D))) (neg.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) d))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 (neg.f64 D) M))) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal -2 binary64) d))))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) d)
(/.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) d)
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (neg.f64 D) M)) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 M #s(literal 1/2 binary64))) (/.f64 d D))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 M D)) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) M) (/.f64 (*.f64 #s(literal 2 binary64) d) D))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) D) D)) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (neg.f64 (*.f64 d (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) d)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (neg.f64 D) M)) (*.f64 d (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 M D)) (*.f64 d (*.f64 #s(literal 2 binary64) d)))
(/.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal -2 binary64) d) d))
(/.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 M D)) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) d)))
(/.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) d) d))
(/.f64 (*.f64 (*.f64 M D) (*.f64 (neg.f64 D) M)) (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 d (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) d))
(/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 #s(literal 4 binary64) (*.f64 d d)))
(/.f64 (*.f64 (neg.f64 D) M) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (neg.f64 D) M) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) d))))
(/.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 d (*.f64 M D)) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 M D) (neg.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 M D) (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal -2 binary64) d))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 M D) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) d)))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (neg.f64 D) M))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 #s(literal -2 binary64) d)) (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 (neg.f64 D) M))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 #s(literal 2 binary64) d)) (*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) d) (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) d)) (*.f64 (*.f64 (neg.f64 D) M) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (neg.f64 D) M)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) d) (*.f64 (*.f64 M D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal -2 binary64) d)) (*.f64 (*.f64 M D) (*.f64 (neg.f64 D) M))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) D) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) d) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal -2 binary64) d)) (*.f64 (neg.f64 D) M)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) (*.f64 #s(literal 2 binary64) d)) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 d (*.f64 M D)) (/.f64 d (*.f64 M D)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 d (*.f64 M D)) (/.f64 d (*.f64 M D)))))
(exp.f64 (+.f64 (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(*.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
(*.f64 (/.f64 d (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (*.f64 d (/.f64 d h))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 l h)) (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))) (sqrt.f64 h))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 d (/.f64 d h)))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d h) d))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (neg.f64 (/.f64 d (sqrt.f64 l)))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))) (neg.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 (neg.f64 h) l)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)))
(/.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 l (/.f64 h d)))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 h d) l))))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l))))))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 l (/.f64 h d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 d (/.f64 d h)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (sqrt.f64 (*.f64 (/.f64 d h) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)) (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h))) (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (sqrt.f64 (/.f64 d l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 h d) l)) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l (/.f64 h d))) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) l) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 l)) (*.f64 (sqrt.f64 d) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(sqrt.f64 (/.f64 d l))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 l))) (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 l))))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 l) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (fma.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64) (*.f64 (log.f64 d) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 d) #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) l) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal -1 binary64) (sqrt.f64 l)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 l)) (*.f64 (sqrt.f64 d) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(sqrt.f64 (/.f64 d l))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 l))) (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 l))))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 l) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (fma.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64) (*.f64 (log.f64 d) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 d) #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (exp.f64 (log.f64 (*.f64 M #s(literal 1/2 binary64)))) (exp.f64 (log.f64 (/.f64 D d))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 2 binary64) d)))))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)) (/.f64 M d))
(*.f64 (pow.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 D) M) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)) M)
(*.f64 (pow.f64 (/.f64 M d) #s(literal 1 binary64)) (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 M d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) M)
(*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))
(*.f64 (/.f64 D d) (*.f64 M #s(literal 1/2 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D d))
(*.f64 (*.f64 (neg.f64 D) M) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 (/.f64 M d) (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)))
(*.f64 (/.f64 M d) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)))
(*.f64 M (*.f64 (/.f64 #s(literal 1/2 binary64) d) D))
(*.f64 M (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 M d))
(*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 d (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)))
(*.f64 #s(literal 1/2 binary64) (*.f64 D (/.f64 M d)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) d)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D))) d)
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M))) d)
(/.f64 (neg.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M)) (neg.f64 d))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) d)
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 D #s(literal 1/2 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (exp.f64 (log.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) (exp.f64 (log.f64 d)))
(/.f64 (exp.f64 (log.f64 (*.f64 (neg.f64 D) M))) (exp.f64 (log.f64 (*.f64 #s(literal -2 binary64) d))))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) d))))
(/.f64 (/.f64 (*.f64 M D) d) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D)) (neg.f64 d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) d)
(/.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) d)
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (neg.f64 d))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) d)
(/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) d)
(/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) M))
(/.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 d D))
(/.f64 (*.f64 (neg.f64 D) M) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(/.f64 M (/.f64 (*.f64 #s(literal 2 binary64) d) D))
(/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d M))
(/.f64 D (*.f64 d (/.f64 #s(literal 2 binary64) M)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) d)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 #s(literal -1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 M (/.f64 D d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 D #s(literal 1/2 binary64)) M)))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 D #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(neg.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) d)) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 (*.f64 (*.f64 M D) (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h)) M)
(*.f64 (*.f64 (*.f64 M D) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64))) (*.f64 M h))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M)
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) D) (*.f64 M M))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) M) D)
(*.f64 (*.f64 (*.f64 M M) D) (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h))
(*.f64 (*.f64 M D) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) (*.f64 M D))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M M) D))
(*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) (*.f64 (*.f64 M h) (*.f64 M D)))
(*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) (*.f64 h (*.f64 (*.f64 M M) D)))
(*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) h) (*.f64 (*.f64 M M) D)))
(*.f64 M (*.f64 D (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M)))
(*.f64 M (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) (*.f64 M D)))
(*.f64 D (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) M))
(*.f64 h (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) (*.f64 (*.f64 M M) D)))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) D) (*.f64 M h)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 M (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64))) h)
(*.f64 (*.f64 M #s(literal 1/8 binary64)) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) h))
(*.f64 (*.f64 M h) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)))
(*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M)
(*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) (*.f64 M h))
(*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) (*.f64 #s(literal 1/8 binary64) (*.f64 M h)))
(*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) h) M))
(*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) (*.f64 M h)))
(*.f64 M (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h))
(*.f64 h (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) M))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) D) (*.f64 M h))) (*.f64 (neg.f64 l) (*.f64 d d)))
(/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) D) (*.f64 M h)) (*.f64 (*.f64 d d) l))
(/.f64 (*.f64 M (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 M h) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 #s(literal 1/8 binary64) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 #s(literal 1/8 binary64) D) (*.f64 M h))))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 d d) l) D) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 d d) l) D) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 d d)) (/.f64 D l))
(*.f64 (neg.f64 (/.f64 D (*.f64 d d))) (/.f64 #s(literal -1 binary64) l))
(*.f64 (/.f64 D l) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (/.f64 D (*.f64 d d)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 D (*.f64 d d)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)) (pow.f64 (/.f64 #s(literal 1 binary64) D) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)) D)
(*.f64 (/.f64 #s(literal 1 binary64) d) (pow.f64 (/.f64 (*.f64 l d) D) #s(literal -1 binary64)))
(*.f64 (/.f64 D d) (/.f64 #s(literal 1 binary64) (*.f64 l d)))
(*.f64 (neg.f64 D) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) l) D))))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 D) (*.f64 (*.f64 d d) l)))
(*.f64 D (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 #s(literal 1 binary64) (/.f64 D (*.f64 (*.f64 d d) l)))
(pow.f64 (/.f64 (*.f64 (*.f64 d d) l) D) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (/.f64 D (*.f64 d d)))) l)
(/.f64 (neg.f64 (/.f64 D l)) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (/.f64 D d)) (neg.f64 (*.f64 l d)))
(/.f64 (neg.f64 (/.f64 D (*.f64 d d))) (neg.f64 l))
(/.f64 (/.f64 D l) (*.f64 d d))
(/.f64 (/.f64 D (*.f64 d d)) l)
(/.f64 (/.f64 D d) (*.f64 l d))
(/.f64 (neg.f64 D) (*.f64 (neg.f64 l) (*.f64 d d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) l) D)))
(/.f64 D (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (/.f64 D l)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l d) (/.f64 D d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) l) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) D))
(neg.f64 (/.f64 (neg.f64 D) (*.f64 (*.f64 d d) l)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (neg.f64 l) (*.f64 d d))) (/.f64 (neg.f64 D) (*.f64 (*.f64 d d) l)))
(-.f64 #s(literal 0 binary64) (/.f64 (neg.f64 D) (*.f64 (*.f64 d d) l)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 d d) l) D)) #s(literal -1 binary64)))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 d d)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) l) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) d) (/.f64 #s(literal 1 binary64) (*.f64 l d)))
(*.f64 (*.f64 (/.f64 D (*.f64 d d)) (*.f64 (*.f64 M M) D)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (neg.f64 D) (*.f64 (*.f64 M M) D)) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) (neg.f64 D)) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) (*.f64 M M)) D)
(*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D))
(*.f64 (/.f64 (*.f64 (*.f64 M M) D) (*.f64 d d)) (/.f64 D l))
(*.f64 (/.f64 (*.f64 (*.f64 M M) D) l) (/.f64 D (*.f64 d d)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) D) d) (/.f64 D (*.f64 l d)))
(*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) D) D)) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) D) (*.f64 M M))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 M M) (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) D))
(*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) (*.f64 (*.f64 M M) D))
(*.f64 M (*.f64 (*.f64 M D) (/.f64 D (*.f64 (*.f64 d d) l))))
(*.f64 M (*.f64 M (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) D)))
(*.f64 D (*.f64 (*.f64 M M) (/.f64 D (*.f64 (*.f64 d d) l))))
(*.f64 D (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)) (*.f64 (*.f64 M M) D)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)))
(pow.f64 (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 (*.f64 M M) D) D)) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 d d))) (neg.f64 l))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) l)) (neg.f64 (*.f64 d d)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) d)) (neg.f64 (*.f64 l d)))
(/.f64 (neg.f64 (*.f64 (/.f64 D (*.f64 d d)) (*.f64 (*.f64 M M) D))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (neg.f64 D) (*.f64 (*.f64 M M) D))) (*.f64 (*.f64 d d) l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) D) (neg.f64 D))) (*.f64 (*.f64 d d) l))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) D) D))) (*.f64 (*.f64 d d) l))
(/.f64 (neg.f64 (*.f64 (*.f64 M M) D)) (neg.f64 (/.f64 (*.f64 (*.f64 d d) l) D)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 d d)) l)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) l) (*.f64 d d))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) d) (*.f64 l d))
(/.f64 (*.f64 (/.f64 D (*.f64 d d)) (*.f64 (*.f64 M M) D)) l)
(/.f64 (*.f64 (neg.f64 D) (*.f64 (*.f64 M M) D)) (*.f64 (neg.f64 l) (*.f64 d d)))
(/.f64 (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d))) l)
(/.f64 (*.f64 (*.f64 (*.f64 M M) D) (neg.f64 D)) (*.f64 (neg.f64 l) (*.f64 d d)))
(/.f64 (/.f64 (*.f64 (*.f64 M M) D) (*.f64 d d)) (/.f64 l D))
(/.f64 (/.f64 (*.f64 (*.f64 M M) D) l) (/.f64 (*.f64 d d) D))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) D) D)) (*.f64 (neg.f64 l) (*.f64 d d)))
(/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 (*.f64 d d) l))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 (*.f64 M M) D) D))))
(/.f64 (*.f64 (*.f64 M M) D) (/.f64 (*.f64 (*.f64 d d) l) D))
(/.f64 #s(literal 1 binary64) (/.f64 l (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) (*.f64 d d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l d) (/.f64 (*.f64 (*.f64 (*.f64 M M) D) D) d)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (/.f64 D (*.f64 d d)) (*.f64 (*.f64 M M) D))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 l) (*.f64 d d)) (*.f64 (neg.f64 D) (*.f64 (*.f64 M M) D))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 l) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) D) (neg.f64 D))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 d d) l) D) (*.f64 (*.f64 M M) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 (*.f64 M M) D) D)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 (*.f64 M M) D) D)))
(*.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) l))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 h)) (/.f64 #s(literal -1 binary64) l))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)))
(*.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (/.f64 #s(literal -1 binary64) l))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 1 binary64))
(*.f64 (/.f64 h l) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 h l))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) (*.f64 #s(literal 1/2 binary64) (/.f64 h l)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64))))
(pow.f64 (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)))) l)
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 h))) l)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) h))) l)
(/.f64 (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64))) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 h)) (neg.f64 l))
(/.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 d (*.f64 M D)) (/.f64 d (*.f64 M D)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) h) l)
(/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (neg.f64 (/.f64 l h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) h))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) (/.f64 l h))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (neg.f64 h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) (neg.f64 h))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) h)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64)) h)))
(*.f64 (exp.f64 (log.f64 (*.f64 M #s(literal 1/2 binary64)))) (exp.f64 (log.f64 (/.f64 D d))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 2 binary64) d)))))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)) (/.f64 M d))
(*.f64 (pow.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 D) M) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)) M)
(*.f64 (pow.f64 (/.f64 M d) #s(literal 1 binary64)) (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 M d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 M D) d) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 M (/.f64 D d)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M)) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) d))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (/.f64 D d) #s(literal 1/2 binary64)) M)
(*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))
(*.f64 (/.f64 D d) (*.f64 M #s(literal 1/2 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D d))
(*.f64 (*.f64 (neg.f64 D) M) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) d)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 (/.f64 M d) (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)))
(*.f64 (/.f64 M d) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)))
(*.f64 M (*.f64 (/.f64 #s(literal 1/2 binary64) d) D))
(*.f64 M (*.f64 (/.f64 D d) #s(literal 1/2 binary64)))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 M d))
(*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 d (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)))
(*.f64 #s(literal 1/2 binary64) (*.f64 D (/.f64 M d)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 M D) d)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D))) d)
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 M (/.f64 D d))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M))) d)
(/.f64 (neg.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M)) (neg.f64 d))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) d)
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 D #s(literal 1/2 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (exp.f64 (log.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) (exp.f64 (log.f64 d)))
(/.f64 (exp.f64 (log.f64 (*.f64 (neg.f64 D) M))) (exp.f64 (log.f64 (*.f64 #s(literal -2 binary64) d))))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) d))))
(/.f64 (/.f64 (*.f64 M D) d) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D)) (neg.f64 d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) d)
(/.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) d)
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (neg.f64 d))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) d)
(/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) d)
(/.f64 (/.f64 D d) (/.f64 #s(literal 2 binary64) M))
(/.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 d D))
(/.f64 (*.f64 (neg.f64 D) M) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(/.f64 M (/.f64 (*.f64 #s(literal 2 binary64) d) D))
(/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d M))
(/.f64 D (*.f64 d (/.f64 #s(literal 2 binary64) M)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (*.f64 M D) d)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 #s(literal -1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 #s(literal 1/2 binary64) (*.f64 M D))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 M (/.f64 D d))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 D #s(literal 1/2 binary64)) M)))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (*.f64 D #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(neg.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) d)) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal -1/2 binary64) d) (*.f64 M D)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64))))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d (*.f64 l h)))) (sqrt.f64 d))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))) (/.f64 d (sqrt.f64 l))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 h))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 l))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h))))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (*.f64 (sqrt.f64 d) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(/.f64 (-.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))) (-.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h))))))
(/.f64 (-.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))) (-.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)))))
(/.f64 (+.f64 (pow.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))) #s(literal 3 binary64))) (fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))) #s(literal 3 binary64))) (fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 (*.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))) (/.f64 d (sqrt.f64 (*.f64 l h))))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))) (/.f64 d (sqrt.f64 l)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 l)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))) (sqrt.f64 h))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l)))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))) (/.f64 d (sqrt.f64 l))) (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 l))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l)))) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
(/.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))) (/.f64 d (sqrt.f64 (*.f64 l h))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 h)) (*.f64 (neg.f64 (sqrt.f64 d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))) (/.f64 d (sqrt.f64 l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64))) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) h))) (*.f64 l l))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) #s(literal 3 binary64))))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 l) (neg.f64 (sqrt.f64 h)))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (/.f64 d (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 d (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (*.f64 d (/.f64 d h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (*.f64 d (/.f64 d h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l))))

eval327.0ms (1.6%)

Memory
23.4MiB live, 516.2MiB allocated
Compiler

Compiled 88 040 to 5 287 computations (94% saved)

prune532.0ms (2.6%)

Memory
-12.7MiB live, 734.4MiB allocated
Pruning

66 alts after pruning (65 fresh and 1 done)

PrunedKeptTotal
New2 611512 662
Fresh311445
Picked415
Done000
Total2 646662 712
Accuracy
95.0%
Counts
2 712 → 66
Alt Table
Click to see full alt table
StatusAccuracyProgram
36.4%
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
39.6%
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
34.9%
(/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 h))
29.2%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
52.1%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
53.3%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
31.5%
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 D (*.f64 d d)) l)) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
33.0%
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 #s(approx (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
▶3.9%
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
16.6%
(/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
22.8%
(/.f64 #s(approx (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))) (sqrt.f64 h))
21.8%
(/.f64 #s(approx (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) (/.f64 D d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) l)) d)) (*.f64 l l))) (sqrt.f64 h))
12.9%
(/.f64 #s(approx (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))) (sqrt.f64 h))
3.5%
(/.f64 #s(approx (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) (sqrt.f64 h))
52.1%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
27.8%
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) D) D) #s(literal 1/4 binary64)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
34.4%
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
14.0%
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))))
12.3%
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
67.0%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (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))))
36.8%
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
52.9%
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
29.5%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 l (*.f64 d d))) #s(literal 1/8 binary64)) h) (*.f64 (*.f64 M D) M)))))
41.4%
(*.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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
36.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
69.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
55.4%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 D M)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 d d)) (*.f64 D M)))))
73.0%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) h)))))
69.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 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
39.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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
39.4%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 d (*.f64 M D)) (/.f64 d (*.f64 M D)))))))
39.1%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (exp.f64 (log.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) (exp.f64 (log.f64 d))) #s(literal 2 binary64))) (/.f64 h l))))
39.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 2 binary64) d))))) #s(literal 2 binary64))) (/.f64 h l))))
38.9%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) d)) (/.f64 h l))))
34.4%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 D d) (/.f64 D d)) (*.f64 #s(literal 1/4 binary64) (*.f64 M M)))) (/.f64 h l))))
▶40.0%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))))
43.5%
(*.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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
72.2%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
39.4%
(*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
9.2%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
67.8%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶73.0%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
20.3%
(*.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
13.7%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
10.2%
(*.f64 #s(approx (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
▶22.2%
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))))
13.8%
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))))
24.4%
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
27.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 d (sqrt.f64 l)) (sqrt.f64 h)))
41.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
15.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
18.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
19.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 (neg.f64 d)) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d)))))
▶30.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
30.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
33.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
4.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 (/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h))) d))
30.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
15.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
30.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
30.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) h)) d))
40.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 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
✓30.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 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
30.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h))) d))
29.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
26.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))))
Compiler

Compiled 4 032 to 2 540 computations (37% saved)

simplify163.0ms (0.8%)

Memory
-7.1MiB live, 143.5MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff320
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
cost-diff384
(*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d)))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff1984
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)))
cost-diff0
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
cost-diff0
(*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d)))
cost-diff0
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))))
cost-diff128
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))
cost-diff0
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
cost-diff0
(sqrt.f64 d)
cost-diff0
(*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
cost-diff0
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
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-diff320
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))
cost-diff384
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
cost-diff1088
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
Rules
7 564×lower-*.f32
7 514×lower-*.f64
3 996×lower-/.f32
3 968×lower-/.f64
3 214×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
088695
0144697
1284649
2865629
33895629
08679620
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))
#s(literal 1 binary64)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))
(/.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)
M
D
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
(*.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)
(/.f64 #s(literal 1 binary64) h)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
(*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
(sqrt.f64 d)
d
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(sqrt.f64 h)
h
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d)))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(/.f64 h (*.f64 (*.f64 l l) l))
h
(*.f64 (*.f64 l l) l)
(*.f64 l l)
l
(*.f64 D D)
D
(*.f64 (neg.f64 M) (/.f64 M d))
(neg.f64 M)
M
(/.f64 M d)
d
#s(literal -1/8 binary64)
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(neg.f64 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)
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 #s(literal 1 binary64) (sqrt.f64 l))
#s(literal 1 binary64)
(sqrt.f64 l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d)))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))
#s(literal 1/4 binary64)
(*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d)))
(*.f64 D (/.f64 M d))
D
(/.f64 M d)
M
(/.f64 h l)
Outputs
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
(*.f64 (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(sqrt.f64 (/.f64 d h))
(/.f64 d h)
d
h
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))
(fma.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 h l)) (/.f64 (*.f64 M M) (*.f64 d d))) (*.f64 D D))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 l d))
(*.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)
M
D
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
(*.f64 (*.f64 (*.f64 (/.f64 M d) h) #s(literal 1/4 binary64)) D)
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))
(*.f64 (*.f64 #s(literal 1/4 binary64) M) (/.f64 D 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)
(/.f64 #s(literal 1 binary64) h)
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
d
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
l
h
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
(*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
(*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d))
(sqrt.f64 d)
d
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
l
(sqrt.f64 h)
h
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))
(fma.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d)))
(*.f64 (*.f64 (/.f64 (neg.f64 M) d) M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(/.f64 h (*.f64 (*.f64 l l) l))
h
(*.f64 (*.f64 l l) l)
(*.f64 l l)
l
(*.f64 D D)
D
(*.f64 (neg.f64 M) (/.f64 M d))
(*.f64 (/.f64 (neg.f64 M) d) M)
(neg.f64 M)
M
(/.f64 M d)
d
#s(literal -1/8 binary64)
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d))
(neg.f64 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)
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))))
(*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)))
(/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(sqrt.f64 d)
d
(sqrt.f64 h)
h
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 l))
#s(literal 1 binary64)
(sqrt.f64 l)
l
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))
(fma.f64 (*.f64 (/.f64 h l) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 h l)) (/.f64 (*.f64 M M) (*.f64 d d))) (*.f64 D D))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) D) (/.f64 (*.f64 M M) (*.f64 d d))) D)
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(literal 2 binary64)
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 (*.f64 M M) (*.f64 d d))) D)
#s(literal 1/4 binary64)
(*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d)))
(*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))
(*.f64 D (/.f64 M d))
(*.f64 (/.f64 M d) D)
D
(/.f64 M d)
M
(/.f64 h l)

localize252.0ms (1.2%)

Memory
18.1MiB live, 409.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.19921875
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
accuracy2.746398853873022
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))))
accuracy3.2895988636322633
(*.f64 D (/.f64 M d))
accuracy7.000125111822401
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))
accuracy7.609725788572725
(*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d)))
accuracy7.897664571220975
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
accuracy10.554058862464345
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
accuracy33.205103124380024
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))))
accuracy0.8199810530686636
(*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
accuracy1.0277541574893765
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
accuracy7.11470944227297
(sqrt.f64 (/.f64 d l))
accuracy33.127476598144696
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
accuracy0
(*.f64 l h)
accuracy0.1328125
(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy6.570934759226206
(sqrt.f64 (*.f64 l h))
accuracy15.667405432220868
#s(approx (* (* (pow (/ d 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.2867268941074688
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
accuracy3.485353974629821
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
accuracy7.11470944227297
(sqrt.f64 (/.f64 d l))
accuracy8.921605440297713
(sqrt.f64 (/.f64 d h))
Samples
88.0ms120×0invalid
85.0ms136×0valid
Compiler

Compiled 666 to 79 computations (88.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 129.0ms
ival-mult: 57.0ms (44.3% of total)
ival-div: 36.0ms (28% of total)
ival-sqrt: 13.0ms (10.1% of total)
ival-pow: 11.0ms (8.6% of total)
ival-sub: 4.0ms (3.1% of total)
ival-pow2: 4.0ms (3.1% of total)
ival-neg: 3.0ms (2.3% of total)
ival-add: 1.0ms (0.8% of total)
exact: 1.0ms (0.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series190.0ms (0.9%)

Memory
7.4MiB live, 331.6MiB allocated
Counts
27 → 1 080
Calls
Call 1
Inputs
#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<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 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())
#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())
#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (*.f64 (*.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 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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 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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h) (taylor 0 h) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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 (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l))))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf h) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf h) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor inf h) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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 (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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 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)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3)))))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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 (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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 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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 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 (* 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor inf M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 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 (* 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M 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 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l))))) (taylor -inf M) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf M) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf M) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 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 (* 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M 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 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h 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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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 (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* 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)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* 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)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* 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)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor -inf l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<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 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 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 (* 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 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/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M 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 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l))))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf D) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (patch (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf D) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 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/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M 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 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d) (taylor 0 d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d) (taylor 0 d) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor 0 d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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 (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/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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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 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 (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 l))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor inf d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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 (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<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)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))) (patch (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) 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 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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) (patch (/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (patch (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<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 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) (patch (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) (patch #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (patch (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow D 2) (pow M 2)) (pow d 2)) (taylor -inf d) (#s(alt (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) (patch (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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 (* -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/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) (patch (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (*.f64 D (/.f64 M d)) (patch (*.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) (patch (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))) #<representation binary64>) () ())) ())
Calls

15 calls:

TimeVariablePointExpression
35.0ms
h
@-inf
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ (* (* (/ 1/2 d) M) D) l) (* (/ (* (* (/ 1/2 d) M) D) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h))) (* 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) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (+ (* (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) -1/8) (* (neg d) (sqrt (/ 1 (* l h))))) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (/ 1 2) (* (* D (/ M d)) (* D (/ M d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (sqrt (/ h (* (* l l) l))) (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)) (* D (/ M d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)))))
10.0ms
D
@0
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ (* (* (/ 1/2 d) M) D) l) (* (/ (* (* (/ 1/2 d) M) D) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h))) (* 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) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (+ (* (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) -1/8) (* (neg d) (sqrt (/ 1 (* l h))))) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (/ 1 2) (* (* D (/ M d)) (* D (/ M d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (sqrt (/ h (* (* l l) l))) (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)) (* D (/ M d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)))))
9.0ms
d
@-inf
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ (* (* (/ 1/2 d) M) D) l) (* (/ (* (* (/ 1/2 d) M) D) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h))) (* 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) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (+ (* (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) -1/8) (* (neg d) (sqrt (/ 1 (* l h))))) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (/ 1 2) (* (* D (/ M d)) (* D (/ M d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (sqrt (/ h (* (* l l) l))) (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)) (* D (/ M d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)))))
8.0ms
M
@inf
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ (* (* (/ 1/2 d) M) D) l) (* (/ (* (* (/ 1/2 d) M) D) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h))) (* 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) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (+ (* (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) -1/8) (* (neg d) (sqrt (/ 1 (* l h))))) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (/ 1 2) (* (* D (/ M d)) (* D (/ M d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (sqrt (/ h (* (* l l) l))) (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)) (* D (/ M d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)))))
8.0ms
d
@0
((/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h)) (/ (* (* (/ 1/2 d) M) D) l) (* (/ (* (* (/ 1/2 d) M) D) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h))) (* 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) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (+ (* (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) -1/8) (* (neg d) (sqrt (/ 1 (* l h))))) (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (/ 1 2) (* (* D (/ M d)) (* D (/ M d))) (* (/ 1 (sqrt l)) (sqrt d)) (sqrt (/ d h)) (sqrt (/ d l)) (* (* (/ 1/2 d) M) D) (sqrt (/ h (* (* l l) l))) (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)) (* D (/ M d)) (* (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (* 1/4 (* (* D (/ M d)) (* D (/ M d))))) (/ h l)))))

simplify278.0ms (1.4%)

Memory
3.8MiB live, 229.1MiB allocated
Algorithm
1×egg-herbie
Rules
7 734×lower-*.f64
7 734×lower-*.f32
5 966×lower-fma.f64
5 966×lower-fma.f32
2 668×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
031117063
192916769
2336116724
3648916649
0822916388
Stop Event
1×iter limit
1×node limit
Counts
1 080 → 1 080
Calls
Call 1
Inputs
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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)
(* 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 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (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 (* d (sqrt (/ 1 (* h l)))))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) 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)
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (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))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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/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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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))))))
(* 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)) d) (sqrt (/ 1 (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d 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)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* 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 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (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))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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/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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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)))))))))
(* 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)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) 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) (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)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 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))))
(* (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 (* (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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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)))))
(* 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 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (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 (* d (sqrt (/ 1 (* h l)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* 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))))) (* d (sqrt (/ 1 (* h l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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)))))
(* (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)) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (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)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* -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 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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)))))
(* (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)) d) (sqrt (/ 1 (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (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)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(* -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 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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))
(* 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)))))
(/ (+ (* -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)) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (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)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (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 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (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))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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/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) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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)))))
(* 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 (/ 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 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (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 (* d (sqrt (/ 1 (* h l)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* 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))))) (* d (sqrt (/ 1 (* h l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (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))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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/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) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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)))))
(* 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)
(* (* 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 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1 (* (* 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 (* (* 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 (* (* 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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 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))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* -1 (* (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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 D)
(* 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)))))
(* 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 l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (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 (* d (sqrt (/ 1 (* h l)))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(+ (* -1 (* 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))))) (* d (sqrt (/ 1 (* h l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 D)
(* 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/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)) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (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)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* -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 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/4 D)
(* 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/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)) d) (sqrt (/ 1 (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (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)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(* -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 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow 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)
(* 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) h)) d) (sqrt (/ 1 (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(sqrt d)
(sqrt d)
(sqrt d)
(sqrt 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)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) 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 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (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))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (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)))))))
(* 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 l)))
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(sqrt d)
(sqrt d)
(sqrt d)
(sqrt d)
(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 (* d (sqrt (/ 1 (* h l)))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (* -1 (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)))))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (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))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/2 (/ (* D M) (* d l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow 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)))))
(* 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 l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(* -1 (* (sqrt d) (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 (* 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 (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 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(/ (* (pow D 2) (pow M 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 (* (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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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)))))
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))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (/ (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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h 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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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))))
(*.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 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 (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (/ (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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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 (/.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 l l) l))) (*.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))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))) (* (/ d h) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))))) h)
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))))) h)
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) 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 (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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))))
(*.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 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 (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) l)))))
(* 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) #s(literal -1/8 binary64))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.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 (*.f64 h (*.f64 l l)) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))))) h)
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.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 (*.f64 h (*.f64 l l)) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))))) h)
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.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 (*.f64 h (*.f64 l l)) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) 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)
(* -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)) 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 (*.f64 (*.f64 l l) l)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* -1 (* h (+ (* -1 (* (/ d h) (sqrt (/ 1 l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (pow l 3))))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) #s(literal -1/8 binary64))
(* -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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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 (*.f64 (*.f64 l l) l)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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))))
(*.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 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 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) l)))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(*.f64 (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 (*.f64 h (*.f64 l l)) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 h h)) h))) 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/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (sqrt.f64 (/.f64 d 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))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (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 (*.f64 (*.f64 l l) 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)) d) (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 (*.f64 (*.f64 l l) 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)) d) (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 (*.f64 (*.f64 l l) l)))) (*.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)
(+ (* -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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h (/.f64 (*.f64 D D) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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/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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) (/.f64 D d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) l)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) (/.f64 D d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) l)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt l))) (* d (sqrt (pow l 3)))) (pow l 2))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) (/.f64 D d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) l)) 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.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 (*.f64 (*.f64 d d) d))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (*.f64 d (*.f64 l l)) l))) (*.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 (*.f64 (*.f64 d d) d))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (*.f64 d (*.f64 l l)) l))) (*.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 (*.f64 (*.f64 d d) d))) (*.f64 (*.f64 M M) h)) (sqrt.f64 (*.f64 (*.f64 d (*.f64 l l)) l))) (*.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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (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 (neg.f64 d) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 l l))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (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 (neg.f64 d) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.f64 l l))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (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 (neg.f64 d) (sqrt.f64 (*.f64 (*.f64 l l) (/.f64 l h))))) (*.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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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))))
(*.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))
(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 (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l 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 (*.f64 l l) (/.f64 l h))) d)) (*.f64 l l))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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)
(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 (/ 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (sqrt.f64 (/.f64 d 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))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (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 (*.f64 (*.f64 l l) 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)) d) (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 (*.f64 (*.f64 l l) 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)) d) (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 (*.f64 (*.f64 l l) l)))) (*.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)
(+ (* -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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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))))
(*.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))
(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 (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) 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))))) (* (* 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 (*.f64 (*.f64 l l) 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))))) (* (* 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 (*.f64 (*.f64 l l) 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 (* (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)
(* (* 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 (*.f64 (*.f64 l l) 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))))) (* (* 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 (*.f64 (*.f64 l l) 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))))) (* (* 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l)))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 D D)) (/.f64 (neg.f64 h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 D D)) (/.f64 (neg.f64 h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) d) (sqrt (/ 1 (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 M M)) (*.f64 D D)) (/.f64 (neg.f64 h) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (neg.f64 (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 (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))))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1 (* (* 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))))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(+ (* -1 (* (* 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))))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) d))) (*.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 (*.f64 (*.f64 l l) 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))))) (* (* 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 (*.f64 (*.f64 l l) 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))))) (* (* 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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))))
(*.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))
(* (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 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 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 M M) (*.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3))))) (* d (sqrt (/ 1 l))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (sqrt.f64 (/.f64 d 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))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (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 (*.f64 (*.f64 l l) 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)) d) (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 (*.f64 (*.f64 l l) 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)) d) (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 (*.f64 (*.f64 l l) l)))) (*.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)
(+ (* -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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 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 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 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 M M) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) h) d) (sqrt (/ 1 (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 l)))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))) (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 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l 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 (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (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 (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M 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 (*.f64 (*.f64 l l) l)))))
(* (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) 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/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 M M)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.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))))
(*.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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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) h)) d) (sqrt (/ 1 (pow l 3)))))
(*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 M M) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 M M) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 d d))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (pow l 3))))) (* (pow d 2) (sqrt (/ 1 l)))) d)
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 M M) h)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 d d))) d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(*.f64 (*.f64 (*.f64 D D) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 M M) h))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 d d) d) l) (*.f64 l l)))))
(/ (+ (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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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 (*.f64 (*.f64 l l) l))) (*.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)) 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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 M M)) (*.f64 (*.f64 (neg.f64 d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 M M)) (*.f64 (*.f64 (neg.f64 d) d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/.f64 (fma.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 M M)) (*.f64 (*.f64 (neg.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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 M M)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 d d))) d)
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l 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) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d 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/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M 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 (*.f64 (*.f64 l l) l)))))
(/ (+ (* -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 (*.f64 (*.f64 l l) l))) (*.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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 M M)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 d 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/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.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)
(* 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* d (sqrt (/ 1 l)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) d)
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) d)
(* d (+ (sqrt (/ 1 l)) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)) (sqrt (/ 1 (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))) d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 d)
(sqrt d)
(sqrt.f64 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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* -1 (* d (sqrt (/ 1 (* h l)))))
(*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* d (+ (* -1 (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (+ (* -1 (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
(* d (+ (* -1 (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d 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))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l 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) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d 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/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) 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/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/2 (/ (* D M) (* d l)))
(*.f64 (*.f64 #s(literal 1/2 binary64) M) (/.f64 D (*.f64 l d)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.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 (* (* 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 l))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (*.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 (*.f64 M M) D) D)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (*.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 (*.f64 M M) D) D)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (pow d 2)) (sqrt (/ 1 (pow l 3))))) (* (sqrt (/ 1 l)) (pow (sqrt -1) 2)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (*.f64 (*.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 (*.f64 M M) D) D)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))))) d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 d)
(* -1 (* (sqrt d) (pow (sqrt -1) 2)))
(sqrt.f64 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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (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 #s(literal 1 binary64) (*.f64 (*.f64 (pow.f64 d #s(literal 5 binary64)) l) (*.f64 l l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(*.f64 (*.f64 (neg.f64 D) D) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 (pow (sqrt -1) 2)) (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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 d d)))
(/ (* (pow D 2) (pow M 2)) (pow d 2))
(*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.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 (* (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/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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d))))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) 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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (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 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 M M)) (/.f64 #s(literal -1/8 binary64) (*.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) d)

rewrite214.0ms (1%)

Memory
27.9MiB live, 293.5MiB allocated
Rules
4 318×lower-*.f32
4 272×lower-*.f64
3 540×lower-/.f32
3 512×lower-/.f64
1 796×lower-pow.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
085428
0138401
1435365
22917345
08759339
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
27 → 997
Calls
Call 1
Inputs
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))
(*.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 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
(*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
(sqrt.f64 d)
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.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))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D)) (*.f64 (neg.f64 M) (/.f64 M d)))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(sqrt.f64 (/.f64 d h))
(sqrt.f64 (/.f64 d l))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))
(*.f64 D (/.f64 M d))
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))))
Outputs
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) D)) #s(literal -1 binary64)) (*.f64 (/.f64 M d) h))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (/.f64 (/.f64 M d) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) D) #s(literal 1 binary64)) (*.f64 (/.f64 M d) h))
(*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
(*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) h)))
(*.f64 h (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) h)
(*.f64 (/.f64 M d) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal -1 binary64)))
(*.f64 (/.f64 M d) (*.f64 (*.f64 #s(literal 1/4 binary64) D) h))
(*.f64 (/.f64 M d) (/.f64 (*.f64 #s(literal 1/4 binary64) D) (/.f64 #s(literal 1 binary64) h)))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 M d) h)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) h))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D #s(literal 1/2 binary64)) (*.f64 (/.f64 M d) h)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 #s(literal 1 binary64) h)))
(pow.f64 (/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h)) (neg.f64 d))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (neg.f64 (/.f64 d h)))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) h) d)
(/.f64 (neg.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (neg.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 (/.f64 d h)))
(/.f64 (*.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (/.f64 d h))
(/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (/.f64 d h))
(/.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (/.f64 #s(literal -1 binary64) h))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (/.f64 #s(literal 1 binary64) h))
(neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (/.f64 #s(literal -1 binary64) h)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)) #s(literal -1 binary64)))
(*.f64 (/.f64 D l) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))
(*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (/.f64 D l))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (*.f64 M D) l))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) l)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M (/.f64 D l)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)))
(*.f64 M (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 D l)))
(*.f64 D (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) l))
(*.f64 D (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (/.f64 #s(literal 1 binary64) l)))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) l) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l))) (neg.f64 d))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))) (neg.f64 (neg.f64 (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 (*.f64 d l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))) (neg.f64 l))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D l)) d)
(/.f64 (neg.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))) (neg.f64 (neg.f64 l)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64)) l)
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))
(/.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (neg.f64 l))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l)
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) l))
(neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (neg.f64 l)))
(exp.f64 (*.f64 (log.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) #s(literal 1 binary64)) h)
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 M d) h))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) (/.f64 h l))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) h)
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) (/.f64 h l)))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 1 binary64))
(*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (/.f64 h l))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) l))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (/.f64 l h)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))))
(*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (*.f64 (/.f64 D l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))))
(*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 h (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (*.f64 (/.f64 M d) h) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 l h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) #s(literal -1 binary64))
(pow.f64 (/.f64 l (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) #s(literal 1 binary64))) (neg.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (neg.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (neg.f64 h))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)))) (neg.f64 (*.f64 (neg.f64 l) (/.f64 #s(literal -1 binary64) h))))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 l) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D))) (neg.f64 (*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) h))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)))) (neg.f64 (*.f64 l (/.f64 #s(literal -1 binary64) h))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))) (neg.f64 (*.f64 l (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)))) (neg.f64 (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (/.f64 #s(literal -1 binary64) h))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D))) (neg.f64 (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (/.f64 #s(literal 1 binary64) h))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))) (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) h) (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))) (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) h) l)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) #s(literal 1 binary64))) (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) h) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))) (neg.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)))) (neg.f64 (neg.f64 (/.f64 l h))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))) (neg.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 l))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) (neg.f64 l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) #s(literal 1 binary64)) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) l)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (neg.f64 h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64)) (/.f64 l h))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) (/.f64 l h))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l)) (/.f64 #s(literal -1 binary64) h))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d))) (*.f64 (neg.f64 l) (/.f64 #s(literal -1 binary64) h)))
(/.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (*.f64 (neg.f64 l) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D)) (*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d))) (*.f64 l (/.f64 #s(literal -1 binary64) h)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64)) (*.f64 l (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d))) (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (/.f64 #s(literal -1 binary64) h)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D)) (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))) (*.f64 (/.f64 #s(literal -1 binary64) h) (neg.f64 l)))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (*.f64 (/.f64 #s(literal -1 binary64) h) l))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) h) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (neg.f64 l)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))) (*.f64 (/.f64 #s(literal 1 binary64) h) (neg.f64 l)))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) l)
(/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (neg.f64 (/.f64 l h)))
(/.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (neg.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) l)))
(/.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 l h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (/.f64 l h))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) l))
(/.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))
(/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 #s(literal 1/4 binary64) D)
(*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 D #s(literal 1/4 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64)))
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)))
(*.f64 (/.f64 d (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 (sqrt.f64 h) d) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (*.f64 d (/.f64 d h))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 l h)) (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 h) (/.f64 d (sqrt.f64 l))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 d (/.f64 d h)))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d h) d))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (neg.f64 (/.f64 d (sqrt.f64 l)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 d))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (neg.f64 (*.f64 d #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (neg.f64 d)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (*.f64 (neg.f64 d) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 l h))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (*.f64 #s(literal 1 binary64) (neg.f64 d)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 l h))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) #s(literal -1 binary64))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h))))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 l h))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) d)) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) d)) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 l) h)))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 (neg.f64 l) h)))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h d)))
(/.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)))
(/.f64 (*.f64 d #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h)))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 l (/.f64 h d)))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 h d) l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 h) (/.f64 d (sqrt.f64 l)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 l (/.f64 h d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (/.f64 d (sqrt.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
(neg.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)) #s(literal -1 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 l h) #s(literal 1/4 binary64)) (pow.f64 (*.f64 l h) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 l) (sqrt.f64 h))
(*.f64 (sqrt.f64 h) (sqrt.f64 (/.f64 l #s(literal 1 binary64))))
(*.f64 (sqrt.f64 h) (pow.f64 (/.f64 l #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 h) (sqrt.f64 l))
(*.f64 (sqrt.f64 (*.f64 l h)) #s(literal 1 binary64))
(pow.f64 (*.f64 (*.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 l h) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 l h) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 l) h)) (sqrt.f64 #s(literal -1 binary64)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (*.f64 l h)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))
(sqrt.f64 (*.f64 l h))
(exp.f64 (fma.f64 (log.f64 l) #s(literal 1/2 binary64) (*.f64 (log.f64 h) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 h) #s(literal 1/2 binary64) (*.f64 (log.f64 l) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (*.f64 l h)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 l h) #s(literal 1 binary64))
(*.f64 l h)
(*.f64 h (/.f64 l #s(literal 1 binary64)))
(*.f64 h l)
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) #s(literal -1 binary64))
(pow.f64 (*.f64 l h) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 l) h)) #s(literal 1 binary64))
(/.f64 (*.f64 (neg.f64 l) h) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(/.f64 (*.f64 l h) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 l h)))
(exp.f64 (log.f64 (*.f64 l h)))
(*.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (sqrt.f64 d))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 h))))
(*.f64 (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)))
(*.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 h)))))
(/.f64 (*.f64 (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)) #s(literal 1 binary64)) (sqrt.f64 h))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (neg.f64 (sqrt.f64 h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))))
(/.f64 (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)) (sqrt.f64 h))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h)))
(neg.f64 (/.f64 (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)) (neg.f64 (sqrt.f64 h))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))) #s(literal -1 binary64)))
(*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
(*.f64 (pow.f64 d #s(literal 1/4 binary64)) (pow.f64 d #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 d) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 d))
(pow.f64 (exp.f64 (log.f64 d)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 d d) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 d #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 d #s(literal 1/2 binary64))
(sqrt.f64 d)
(exp.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)))
#s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(*.f64 (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (neg.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h))))))
(*.f64 (fma.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (pow.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (-.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (neg.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (-.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h)))))) (fma.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (pow.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)))))) (neg.f64 (-.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (neg.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (pow.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (-.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h))))) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h))))))
(/.f64 (-.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))))) (-.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (neg.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h)))))) (neg.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (pow.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h)) (-.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (pow.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (-.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))))))
(/.f64 (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (neg.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(/.f64 (fma.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (pow.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) #s(literal 3 binary64))) (fma.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h)) (-.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h)))))))
(/.f64 (fma.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (pow.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (-.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (neg.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (-.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h)))))) (fma.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (pow.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (neg.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M))) (-.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h)))))) (fma.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (pow.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) #s(literal 3 binary64)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))) (/.f64 M d) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (*.f64 (neg.f64 M) (/.f64 M d)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) #s(literal -1 binary64)) d (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))))
(fma.f64 (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64))) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 #s(literal -1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (neg.f64 d) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))))
(fma.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D)) D) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D)) D) #s(literal -1/8 binary64) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) #s(literal -1/8 binary64)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) #s(literal -1/8 binary64)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 D D) (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(fma.f64 d (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))))
(-.f64 (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)) (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h))))) (/.f64 (*.f64 (*.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 l h))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 d (sqrt.f64 (*.f64 l h))))))
(-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(+.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))))
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h)))))
(*.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D)) D)
(*.f64 (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 D D))
(*.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (/.f64 M d)) (neg.f64 M))
(*.f64 (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (/.f64 M d))))
(*.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (/.f64 M d))
(*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))
(*.f64 (neg.f64 M) (*.f64 (/.f64 M d) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))))
(*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 M) (/.f64 M d)))
(*.f64 (*.f64 D D) (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (neg.f64 M) (/.f64 M d))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)))
(*.f64 (/.f64 M d) (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D)))) (neg.f64 (*.f64 (sqrt.f64 l) l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (neg.f64 M))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) #s(literal 1 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 M) M))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) M)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))) (neg.f64 (/.f64 d M)))
(/.f64 (*.f64 (*.f64 (neg.f64 M) M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) d)
(/.f64 (*.f64 (sqrt.f64 h) (*.f64 (*.f64 (neg.f64 M) (/.f64 M d)) (*.f64 D D))) (*.f64 (sqrt.f64 l) l))
(/.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (neg.f64 M)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) #s(literal 1 binary64)) (/.f64 d M))
(/.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 M) M)) d)
(/.f64 (*.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) M) d)
(/.f64 (*.f64 (neg.f64 M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (/.f64 d M))
(neg.f64 (*.f64 (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (/.f64 M d) M)))
(neg.f64 (*.f64 (*.f64 (/.f64 M d) M) (*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) D)
(*.f64 (*.f64 D D) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) (*.f64 D D))
(*.f64 D (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 h) (*.f64 D D))) (neg.f64 (*.f64 (sqrt.f64 l) l)))
(/.f64 (neg.f64 (*.f64 (*.f64 D D) (sqrt.f64 h))) (neg.f64 (*.f64 (sqrt.f64 l) l)))
(/.f64 (*.f64 (sqrt.f64 h) (*.f64 D D)) (*.f64 (sqrt.f64 l) l))
(/.f64 (*.f64 (*.f64 D D) (sqrt.f64 h)) (*.f64 (sqrt.f64 l) l))
(exp.f64 (fma.f64 (log.f64 D) #s(literal 2 binary64) (*.f64 (log.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #s(literal 1/2 binary64) (*.f64 (log.f64 D) #s(literal 2 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)))
(*.f64 (/.f64 d (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 (sqrt.f64 h) d) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (*.f64 d (/.f64 d h))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d)
(*.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))))
(*.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))))
(*.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))))
(*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))
(*.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 l h)) (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d l) (/.f64 d l)) (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 d h) (/.f64 d h)) (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 h) (/.f64 d (sqrt.f64 l))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 d (/.f64 d h)))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 d h) d))) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (neg.f64 (/.f64 d (sqrt.f64 l)))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 d))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (neg.f64 (*.f64 d #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (neg.f64 d)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (*.f64 (neg.f64 d) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 l h))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (*.f64 #s(literal 1 binary64) (neg.f64 d)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 l h))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) #s(literal -1 binary64))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h))))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 l h))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) d)) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) d)) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 d) d)) (sqrt.f64 (*.f64 (neg.f64 l) h)))
(/.f64 (sqrt.f64 (*.f64 d (neg.f64 d))) (sqrt.f64 (*.f64 (neg.f64 l) h)))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 (*.f64 h (/.f64 l d))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 h)))
(/.f64 (sqrt.f64 (*.f64 d (/.f64 d h))) (sqrt.f64 l))
(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
(/.f64 (*.f64 (sqrt.f64 (/.f64 d l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h d)))
(/.f64 (neg.f64 (/.f64 d (sqrt.f64 l))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (neg.f64 d)) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 l h)))))
(/.f64 (*.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 d))) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 d)) (*.f64 (neg.f64 (sqrt.f64 h)) (sqrt.f64 l)))
(/.f64 (*.f64 d #s(literal 1 binary64)) (sqrt.f64 (*.f64 l h)))
(/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 l (/.f64 h d)))))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 h d) l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 h) (/.f64 d (sqrt.f64 l)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)))
(/.f64 (neg.f64 d) (neg.f64 (sqrt.f64 (*.f64 l h))))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 d l))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 l (/.f64 h d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 h d) l)))
(/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (/.f64 d (sqrt.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d))
(/.f64 d (sqrt.f64 (*.f64 (neg.f64 h) (neg.f64 l))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
(neg.f64 (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 (*.f64 l h)) d)) #s(literal -1 binary64)))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (exp.f64 (log.f64 (*.f64 (/.f64 M d) D))) (exp.f64 (log.f64 (*.f64 (/.f64 M d) D))))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) D) D) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (*.f64 D D) (/.f64 M d)) (/.f64 M d))
(*.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 (/.f64 #s(literal 1 binary64) d) (/.f64 #s(literal 1 binary64) d)))
(*.f64 (*.f64 M M) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) D) #s(literal 2 binary64)))
(*.f64 (*.f64 M M) (*.f64 (/.f64 D d) (/.f64 D d)))
(*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))
(*.f64 (/.f64 (*.f64 M (*.f64 M D)) (*.f64 d d)) D)
(*.f64 (*.f64 (*.f64 (/.f64 M d) D) D) (/.f64 M d))
(*.f64 (*.f64 (/.f64 M d) D) (*.f64 (/.f64 M d) D))
(*.f64 (*.f64 D D) (/.f64 (*.f64 M M) (*.f64 d d)))
(*.f64 (/.f64 M d) (*.f64 (*.f64 (/.f64 M d) D) D))
(*.f64 D (*.f64 D (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 D (/.f64 (*.f64 M (*.f64 M D)) (*.f64 d d)))
(pow.f64 (exp.f64 (log.f64 (*.f64 (/.f64 M d) D))) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64))
(pow.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) (*.f64 (/.f64 M d) D))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) D) D) (neg.f64 M))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) D) D) #s(literal 1 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 M d) D) (*.f64 M D))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) D) D) M)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 M d) D) D)) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 (*.f64 M M) (*.f64 D D))) (neg.f64 (*.f64 d d)))
(/.f64 (*.f64 (*.f64 M D) (*.f64 (/.f64 M d) D)) d)
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) D) D) (neg.f64 M)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) D) D) #s(literal 1 binary64)) (/.f64 d M))
(/.f64 (*.f64 (*.f64 (/.f64 M d) D) (*.f64 M D)) d)
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) D) D) M) d)
(/.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 d d))
(/.f64 (*.f64 (*.f64 (/.f64 M d) D) D) (/.f64 d M))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 M d) D)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 l))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 l))))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (neg.f64 (sqrt.f64 l))))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 l d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(sqrt.f64 (/.f64 d l))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 l) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (fma.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64) (*.f64 (log.f64 d) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 d) #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (pow.f64 (*.f64 d #s(literal 1 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 h))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 h)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 d)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d))
(*.f64 (neg.f64 (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 h))))
(*.f64 (sqrt.f64 d) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d h)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d h)))
(pow.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 d h) (/.f64 d h)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 h d) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 h d)) #s(literal -1 binary64))
(pow.f64 (/.f64 d h) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 d)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 h))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 h d))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 (/.f64 h d)) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 h))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (/.f64 h d)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 h d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d)))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 h)))
(neg.f64 (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 h))))
(sqrt.f64 (/.f64 d h))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 h) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d h) (/.f64 d h))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 h d))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 d (neg.f64 l))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 d (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))
(*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))
(*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 d l)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 d l)))
(pow.f64 (sqrt.f64 (/.f64 l d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 l d) #s(literal -1/2 binary64))
(pow.f64 (/.f64 d l) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 l))))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 d))) (neg.f64 (sqrt.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 (neg.f64 l))))
(/.f64 (sqrt.f64 (*.f64 d #s(literal 1 binary64))) (sqrt.f64 l))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 l d))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 d))) (neg.f64 (neg.f64 (sqrt.f64 l))))
(/.f64 (*.f64 (sqrt.f64 d) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 d)) (neg.f64 (sqrt.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 l d))))
(/.f64 (sqrt.f64 d) (sqrt.f64 l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 l d) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))
(sqrt.f64 (/.f64 d l))
(exp.f64 (-.f64 (*.f64 (log.f64 d) #s(literal 1/2 binary64)) (*.f64 (log.f64 l) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64) (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64))))
(exp.f64 (fma.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64) (*.f64 (log.f64 d) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 d) #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 l) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 d l) (/.f64 d l))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))
(*.f64 (exp.f64 (log.f64 (*.f64 M #s(literal 1/2 binary64)))) (exp.f64 (log.f64 (/.f64 D d))))
(*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 2 binary64) d)))))
(*.f64 (exp.f64 (log.f64 M)) (exp.f64 (log.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)) (/.f64 M d))
(*.f64 (pow.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 M) D) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) d)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 D #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 M d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)) M)
(*.f64 (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 M d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)) D)
(*.f64 (pow.f64 (/.f64 M d) #s(literal 1 binary64)) (pow.f64 (/.f64 D #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 M d) #s(literal 1 binary64)) (pow.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))
(*.f64 (*.f64 D (/.f64 #s(literal 1/2 binary64) d)) M)
(*.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))
(*.f64 (/.f64 D d) (*.f64 M #s(literal 1/2 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D d))
(*.f64 (*.f64 (neg.f64 M) D) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) d)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 M D)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 M D))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))
(*.f64 (/.f64 M d) (pow.f64 (/.f64 #s(literal 2 binary64) D) #s(literal -1 binary64)))
(*.f64 (/.f64 M d) (/.f64 D #s(literal 2 binary64)))
(*.f64 (/.f64 M d) (*.f64 D #s(literal 1/2 binary64)))
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)))
(*.f64 M (*.f64 (/.f64 #s(literal 1/2 binary64) d) D))
(*.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 M d))
(*.f64 D (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) #s(literal 1 binary64)))
(*.f64 D (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)) #s(literal 1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) d) (*.f64 M D)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 M d) D))
(pow.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) #s(literal 2 binary64))
(pow.f64 (/.f64 d (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M)) (neg.f64 d))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 M) D))) (neg.f64 (neg.f64 (*.f64 #s(literal -2 binary64) d))))
(/.f64 (neg.f64 (*.f64 (/.f64 M d) D)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 D #s(literal 1/2 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64))) (*.f64 #s(literal -2 binary64) d))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 M D))) (*.f64 #s(literal -2 binary64) d))
(/.f64 (exp.f64 (log.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) (exp.f64 (log.f64 d)))
(/.f64 (exp.f64 (log.f64 (*.f64 (neg.f64 M) D))) (exp.f64 (log.f64 (*.f64 #s(literal -2 binary64) d))))
(/.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) d))))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 M D)) (neg.f64 d))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 M D)) d)
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) (neg.f64 M)) (neg.f64 d))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1 binary64)) (/.f64 d M))
(/.f64 (*.f64 (*.f64 D #s(literal 1/2 binary64)) M) d)
(/.f64 (neg.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) D)) (neg.f64 (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) d)
(/.f64 (*.f64 (*.f64 M D) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 M D)) (*.f64 #s(literal 2 binary64) d))
(/.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)) d)
(/.f64 (*.f64 (neg.f64 M) D) (*.f64 #s(literal -2 binary64) d))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 d (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 M D) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 D #s(literal 1/2 binary64)) (/.f64 d M))
(neg.f64 (/.f64 (*.f64 (neg.f64 M) D) (*.f64 #s(literal 2 binary64) d)))
(neg.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal -2 binary64) d)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) l) h) #s(literal -1/4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 l l) l) h) #s(literal -1/4 binary64)))
(*.f64 (/.f64 (sqrt.f64 h) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
(*.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 l) (*.f64 l l)))))
(*.f64 (sqrt.f64 (neg.f64 h)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 l) (*.f64 l l))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 l) l)) (sqrt.f64 h))
(*.f64 (sqrt.f64 h) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 l) l)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))
(pow.f64 (exp.f64 (log.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 h (*.f64 (*.f64 l l) l)) (/.f64 h (*.f64 (*.f64 l l) l))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 (*.f64 l l) l) h) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 l (sqrt.f64 (/.f64 l h))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 l l) l) h) #s(literal -1/2 binary64))
(pow.f64 (/.f64 h (*.f64 (*.f64 l l) l)) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 h) l)) (neg.f64 (sqrt.f64 l)))
(/.f64 (neg.f64 (sqrt.f64 (neg.f64 h))) (neg.f64 (*.f64 (sqrt.f64 (neg.f64 l)) l)))
(/.f64 (sqrt.f64 (neg.f64 (/.f64 h (*.f64 l l)))) (sqrt.f64 (neg.f64 l)))
(/.f64 (sqrt.f64 (neg.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 (*.f64 (neg.f64 l) (*.f64 l l)))))
(/.f64 (sqrt.f64 (/.f64 h l)) l)
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) l) h))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 h))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 l) l))))
(/.f64 (/.f64 (sqrt.f64 h) l) (sqrt.f64 l))
(/.f64 (sqrt.f64 (neg.f64 h)) (*.f64 (sqrt.f64 (neg.f64 l)) l))
(/.f64 (neg.f64 (sqrt.f64 h)) (neg.f64 (*.f64 (sqrt.f64 l) l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 l (sqrt.f64 (/.f64 l h)))))
(/.f64 (sqrt.f64 h) (*.f64 (sqrt.f64 l) l))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (/.f64 h (*.f64 l l)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 (*.f64 (*.f64 l l) l) h) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 l (sqrt.f64 (/.f64 l h))))
(sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))
(exp.f64 (*.f64 (log.f64 (/.f64 h (*.f64 (*.f64 l l) l))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) #s(literal -1 binary64)) (neg.f64 h))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) #s(literal 1 binary64)) h)
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 M d) h))
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) (/.f64 h l))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)))
(*.f64 (*.f64 (/.f64 h l) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) h)
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) (/.f64 h l)))
(*.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 1 binary64))
(*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))
(*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (/.f64 h l))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (*.f64 #s(literal 1/2 binary64) (/.f64 h l)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) l))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (/.f64 l h)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))))
(*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) (*.f64 (/.f64 D l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))))
(*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 h (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))))
(*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (*.f64 (/.f64 M d) h) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 l h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) #s(literal -1 binary64))
(pow.f64 (/.f64 l (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (neg.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) #s(literal 1 binary64))) (neg.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (neg.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (neg.f64 h))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l))) (/.f64 #s(literal 1 binary64) h))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)))) (neg.f64 (*.f64 (neg.f64 l) (/.f64 #s(literal -1 binary64) h))))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 l) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D))) (neg.f64 (*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) h))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)))) (neg.f64 (*.f64 l (/.f64 #s(literal -1 binary64) h))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64))) (neg.f64 (*.f64 l (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)))) (neg.f64 (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (/.f64 #s(literal -1 binary64) h))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D))) (neg.f64 (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (/.f64 #s(literal 1 binary64) h))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))) (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) h) (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))) (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) h) l)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) #s(literal 1 binary64))) (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) h) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))) (neg.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (neg.f64 l))))
(/.f64 (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)))) (neg.f64 (neg.f64 (/.f64 l h))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))) (neg.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) (neg.f64 l))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (*.f64 (neg.f64 h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) (neg.f64 l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d))) (/.f64 #s(literal -1 binary64) h))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) #s(literal 1 binary64)) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) l)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (neg.f64 h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) #s(literal 1 binary64)) (/.f64 l h))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))) (/.f64 l h))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l)) (/.f64 #s(literal -1 binary64) h))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d))) (*.f64 (neg.f64 l) (/.f64 #s(literal -1 binary64) h)))
(/.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) #s(literal 1 binary64)) (*.f64 (neg.f64 l) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 (*.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D)) (*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d))) (*.f64 l (/.f64 #s(literal -1 binary64) h)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #s(literal 1 binary64)) (*.f64 l (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d))) (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (/.f64 #s(literal -1 binary64) h)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D)) (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (/.f64 #s(literal 1 binary64) h)))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))) (*.f64 (/.f64 #s(literal -1 binary64) h) (neg.f64 l)))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (*.f64 (/.f64 #s(literal -1 binary64) h) l))
(/.f64 (*.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) h) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (neg.f64 l)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M))) (*.f64 (/.f64 #s(literal 1 binary64) h) (neg.f64 l)))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l) (/.f64 #s(literal 1 binary64) h))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) l)
(/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (neg.f64 (/.f64 l h)))
(/.f64 (*.f64 (neg.f64 D) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (neg.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) l)))
(/.f64 (/.f64 (*.f64 M (*.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 l h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) (/.f64 l h))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) l))
(/.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d))
(/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d)))))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 M (*.f64 #s(literal 1/4 binary64) D))) d) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D))))))
(*.f64 (pow.f64 (/.f64 M d) #s(literal 1 binary64)) D)
(*.f64 (*.f64 M D) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal 1 binary64)))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 M d) D)
(*.f64 M (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) d) D) #s(literal 1 binary64)))
(*.f64 M (*.f64 (/.f64 #s(literal 1 binary64) d) D))
(*.f64 M (/.f64 D d))
(*.f64 D (pow.f64 (/.f64 M d) #s(literal 1 binary64)))
(*.f64 D (/.f64 M d))
(pow.f64 (/.f64 d (*.f64 M D)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 M d) D) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) D)) (neg.f64 (/.f64 d M)))
(/.f64 (neg.f64 (*.f64 D #s(literal 1 binary64))) (neg.f64 (/.f64 d M)))
(/.f64 (*.f64 #s(literal 1 binary64) D) (/.f64 d M))
(/.f64 (*.f64 D #s(literal 1 binary64)) (/.f64 d M))
(/.f64 (neg.f64 (*.f64 (neg.f64 M) D)) (neg.f64 (neg.f64 d)))
(/.f64 (neg.f64 D) (neg.f64 (/.f64 d M)))
(/.f64 (*.f64 (neg.f64 M) D) (neg.f64 d))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 d (*.f64 M D))))
(/.f64 (*.f64 M D) d)
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 M D)))
(/.f64 D (/.f64 d M))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 M d) D)) #s(literal 1 binary64)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d (*.f64 l h)))) (sqrt.f64 d))
(*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 d)))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 d)) (*.f64 (sqrt.f64 (/.f64 d l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 (/.f64 d (*.f64 l h))))
(*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))))
(*.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 h))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
(*.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)))
(*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(*.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
(*.f64 (sqrt.f64 d) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d (*.f64 l h)))))
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (/.f64 d h)) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (*.f64 l l))) (/.f64 d (sqrt.f64 (*.f64 l h))))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))))) (neg.f64 (sqrt.f64 (/.f64 h d))))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 h)))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (*.f64 l l))))) (neg.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 h)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (*.f64 l l))) (/.f64 d (sqrt.f64 l)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 l)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (*.f64 l l))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (*.f64 l l))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 h d)))
(/.f64 (*.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 h))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (*.f64 l l)))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 h))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (*.f64 l l))) (/.f64 d (sqrt.f64 l))) (*.f64 (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 3 binary64))) (/.f64 d (sqrt.f64 l))) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 h)))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h)) (*.f64 l l)))) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 h) (fma.f64 (*.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (fma.f64 (*.f64 (/.f64 h l) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 h)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h)))))))
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))) (sqrt.f64 h))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)))) (sqrt.f64 h)))
(neg.f64 (/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 h))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64))) (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 l h)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 d (sqrt.f64 l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (pow.f64 (/.f64 (sqrt.f64 h) d) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (*.f64 d (/.f64 d h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (pow.f64 (/.f64 #s(literal 1 binary64) d) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (*.f64 l h)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 d l)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (sqrt.f64 d) (sqrt.f64 (/.f64 d (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l))))
(fma.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(fma.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h)))))) #s(literal -1 binary64)))
(+.f64 (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(literal 1 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l))))
(+.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l)) (/.f64 d (sqrt.f64 (*.f64 l h)))))

eval359.0ms (1.7%)

Memory
57.5MiB live, 566.0MiB allocated
Compiler

Compiled 71 793 to 3 816 computations (94.7% saved)

prune502.0ms (2.4%)

Memory
-68.3MiB live, 660.6MiB allocated
Pruning

75 alts after pruning (72 fresh and 3 done)

PrunedKeptTotal
New2 243312 274
Fresh194160
Picked325
Done011
Total2 265752 340
Accuracy
95.0%
Counts
2 340 → 75
Alt Table
Click to see full alt table
StatusAccuracyProgram
39.6%
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
34.9%
(/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 h))
52.1%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
53.3%
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
25.0%
(/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))) (sqrt.f64 h))
33.0%
(/.f64 (*.f64 (sqrt.f64 d) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 #s(approx (* (* (* 1/8 (/ D (* (* d d) l))) h) M) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 M D)) (/.f64 h (*.f64 (*.f64 d d) l)))) (*.f64 M D)))) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
3.5%
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l))))) (sqrt.f64 h))
3.9%
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))))) (sqrt.f64 h))
3.5%
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))))) (sqrt.f64 h))
✓3.9%
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
16.6%
(/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l)))))
21.8%
(/.f64 #s(approx (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 l)) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) (/.f64 D d)) (*.f64 (sqrt.f64 (*.f64 (*.f64 l l) l)) d)) (*.f64 l l))) (sqrt.f64 h))
12.9%
(/.f64 #s(approx (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (*.f64 h (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)))))) (sqrt.f64 h))
3.5%
(/.f64 #s(approx (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) (sqrt.f64 h))
52.1%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))))
10.3%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
23.4%
(*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
34.4%
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
3.9%
(*.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (sqrt.f64 d))
36.4%
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))))
14.0%
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))))
12.3%
(*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
67.0%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) (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))))
3.9%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)))
36.8%
(*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l))))
41.9%
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
52.9%
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 (*.f64 M #s(literal 1/2 binary64)) D)) (*.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
69.7%
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d))) (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D))))
42.6%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))))
39.1%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (exp.f64 (log.f64 (*.f64 (*.f64 M D) #s(literal 1/2 binary64)))) (exp.f64 (log.f64 d))) #s(literal 2 binary64))) (/.f64 h l))))
39.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (*.f64 (exp.f64 (log.f64 (*.f64 M D))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 2 binary64) d))))) #s(literal 2 binary64))) (/.f64 h l))))
38.9%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (/.f64 M d) D) (*.f64 M D)) d))) (/.f64 h l))))
44.3%
(*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))))
9.2%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d (*.f64 l h))) (sqrt.f64 d)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
67.8%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
40.2%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h)))))
70.2%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 d (*.f64 M D)))))))
45.5%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) l)))
71.2%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))))
71.2%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) l))))
69.9%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (/.f64 l h)))))
66.9%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 h (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l))))))
46.1%
(*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (/ (* (* (/ 1/2 d) M) D) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (/ 1 h))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (*.f64 l (*.f64 d d)))))))
20.3%
(*.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
43.4%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))))
13.7%
(*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
10.2%
(*.f64 #s(approx (* (/ (sqrt d) (sqrt h)) (pow (/ d l) (/ 1 2))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))))))
36.3%
(*.f64 #s(approx (* (/ (sqrt d) (sqrt h)) (* (/ 1 (sqrt l)) (sqrt d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l))))
10.3%
(*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
25.4%
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h)))))
13.8%
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (*.f64 (*.f64 (*.f64 D D) #s(literal -1/8 binary64)) (*.f64 (/.f64 (*.f64 M M) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))))
24.4%
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))))
28.9%
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) #s(approx (+ (* (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) -1/8) (* (neg d) (sqrt (/ 1 (* l h))))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))) (*.f64 (neg.f64 D) (*.f64 D (/.f64 (*.f64 M M) d))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))))
15.7%
#s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) #s(approx (+ (* (* (* (sqrt (/ h (* (* l l) l))) (* D D)) (* (neg M) (/ M d))) -1/8) (* (neg d) (sqrt (/ 1 (* l h))))) (*.f64 (*.f64 (*.f64 M M) #s(literal 1/8 binary64)) (*.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l)))))))
27.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 d (sqrt.f64 l)) (sqrt.f64 h)))
24.3%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 l h))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (neg.f64 d))) (*.f64 (neg.f64 (sqrt.f64 (*.f64 l h))) (sqrt.f64 (*.f64 l h)))))
41.2%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
15.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
18.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
19.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 (neg.f64 d)) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d)))))
30.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
28.5%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
30.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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 l h))))))
✓30.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
30.6%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
33.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
4.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 (/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h))) d))
30.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 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))) d))
30.4%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
30.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) h)) d))
40.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 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
✓30.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 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))
30.7%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h))) d))
29.0%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
26.8%
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))))
Compiler

Compiled 6 585 to 1 940 computations (70.5% saved)

regimes409.0ms (2%)

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

7 calls:

114.0ms
l
62.0ms
M
50.0ms
d
47.0ms
h
45.0ms
D
Results
AccuracySegmentsBranch
84.5%2d
86.8%3h
86.7%3l
73.0%1M
73.0%1D
77.8%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
73.0%1(*.f64 M D)
Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes65.0ms (0.3%)

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

1 calls:

45.0ms
h
Results
AccuracySegmentsBranch
86.8%3h
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes55.0ms (0.3%)

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

1 calls:

46.0ms
h
Results
AccuracySegmentsBranch
86.7%3h
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes37.0ms (0.2%)

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

1 calls:

31.0ms
h
Results
AccuracySegmentsBranch
86.7%3h
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes127.0ms (0.6%)

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

3 calls:

50.0ms
h
40.0ms
l
30.0ms
d
Results
AccuracySegmentsBranch
84.5%2d
84.5%2l
84.5%2h
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes88.0ms (0.4%)

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

3 calls:

30.0ms
h
26.0ms
l
26.0ms
d
Results
AccuracySegmentsBranch
80.2%2l
80.2%2d
80.2%2h
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes190.0ms (0.9%)

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

3 calls:

78.0ms
h
73.0ms
d
24.0ms
l
Results
AccuracySegmentsBranch
78.6%2d
78.8%2h
79.7%2l
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes75.0ms (0.4%)

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

2 calls:

46.0ms
h
24.0ms
l
Results
AccuracySegmentsBranch
77.8%2h
78.6%2l
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes145.0ms (0.7%)

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

4 calls:

53.0ms
l
31.0ms
h
29.0ms
d
20.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
76.5%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
71.2%1h
74.3%2d
75.6%3l
Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes25.0ms (0.1%)

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

1 calls:

20.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
75.0%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 40 to 22 computations (45% saved)

regimes199.0ms (1%)

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

5 calls:

54.0ms
D
48.0ms
(*.f64 M D)
33.0ms
M
23.0ms
d
20.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Results
AccuracySegmentsBranch
74.3%2d
71.2%1(*.f64 M D)
71.2%1M
71.2%1D
73.8%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 66 to 43 computations (34.8% saved)

regimes217.0ms (1.1%)

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

7 calls:

48.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))))
41.0ms
M
34.0ms
d
27.0ms
l
21.0ms
D
Results
AccuracySegmentsBranch
69.5%2h
69.9%2(*.f64 M D)
66.9%1M
69.6%2D
70.6%2(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
71.6%3l
70.0%2d
Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes297.0ms (1.4%)

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

7 calls:

84.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))))
50.0ms
M
50.0ms
d
36.0ms
h
27.0ms
(*.f64 M D)
Results
AccuracySegmentsBranch
56.5%2M
66.2%4h
59.2%3D
60.5%3(*.f64 M D)
68.1%4d
66.3%4l
62.1%3(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes103.0ms (0.5%)

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

3 calls:

28.0ms
d
28.0ms
h
18.0ms
l
Results
AccuracySegmentsBranch
59.5%4h
63.9%6l
70.1%7d
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes21.0ms (0.1%)

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

1 calls:

17.0ms
d
Results
AccuracySegmentsBranch
67.7%6d
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes58.0ms (0.3%)

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

2 calls:

31.0ms
d
24.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Results
AccuracySegmentsBranch
62.1%3(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
66.1%6d
Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes100.0ms (0.5%)

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

5 calls:

30.0ms
(*.f64 M D)
26.0ms
d
14.0ms
D
14.0ms
l
12.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
51.4%2D
62.5%6l
54.4%3(*.f64 M D)
61.9%5d
58.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 66 to 43 computations (34.8% saved)

regimes39.0ms (0.2%)

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

2 calls:

24.0ms
d
12.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
58.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))))
59.2%5d
Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes65.0ms (0.3%)

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

23.0ms
h
13.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
13.0ms
M
12.0ms
l
Results
AccuracySegmentsBranch
57.7%5l
52.6%4h
48.8%2M
56.2%3(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes48.0ms (0.2%)

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

2 calls:

33.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))))
12.0ms
d
Results
AccuracySegmentsBranch
56.8%5d
55.3%3(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes45.0ms (0.2%)

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

3 calls:

22.0ms
l
10.0ms
(*.f64 M D)
10.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Results
AccuracySegmentsBranch
50.2%2(*.f64 M D)
53.6%3l
54.1%3(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Compiler

Compiled 54 to 33 computations (38.9% saved)

regimes77.0ms (0.4%)

Memory
-16.9MiB live, 61.2MiB 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)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt 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)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) 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 d (sqrt.f64 l)) (sqrt.f64 h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h))))))
(*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
(/.f64 #s(approx (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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 (/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (neg.f64 h) (/.f64 l d)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (*.f64 (/.f64 h d) (neg.f64 l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
(*.f64 (/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h)) (sqrt.f64 d))
(/.f64 (*.f64 (sqrt.f64 d) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d 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 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)) (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 h d)) #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))))
Outputs
(*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (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 (/.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

5 calls:

25.0ms
l
8.0ms
d
8.0ms
D
8.0ms
(*.f64 M D)
7.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Results
AccuracySegmentsBranch
48.2%2(*.f64 M D)
46.4%2D
50.4%3d
51.7%4l
51.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 66 to 43 computations (34.8% saved)

regimes11.0ms (0.1%)

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

2 calls:

5.0ms
h
5.0ms
(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
Results
AccuracySegmentsBranch
50.5%3h
47.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 46 to 27 computations (41.3% saved)

regimes41.0ms (0.2%)

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

4 calls:

28.0ms
M
4.0ms
l
4.0ms
d
4.0ms
h
Results
AccuracySegmentsBranch
47.8%2l
33.5%2M
48.3%2d
47.8%2h
Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes14.0ms (0.1%)

Memory
25.4MiB live, 25.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)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.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 (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt 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 d (sqrt.f64 (*.f64 l h))))
Calls

5 calls:

3.0ms
l
3.0ms
d
3.0ms
h
3.0ms
D
3.0ms
(*.f64 M D)
Results
AccuracySegmentsBranch
33.3%2D
45.3%2h
46.2%2l
30.6%1(*.f64 M D)
46.2%2d
Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes10.0ms (0.1%)

Memory
-15.2MiB live, 23.8MiB allocated
Counts
4 → 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)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.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)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.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 l h))))
Calls

4 calls:

3.0ms
d
2.0ms
h
2.0ms
l
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))))
Results
AccuracySegmentsBranch
36.5%2h
35.3%3(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
37.4%2l
36.6%2d
Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes29.0ms (0.1%)

Memory
-18.4MiB live, 21.2MiB 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

6 calls:

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
h
1.0ms
M
1.0ms
d
Results
AccuracySegmentsBranch
30.6%1D
30.6%1M
30.6%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))))
30.6%1h
30.6%1d
30.6%1l
Compiler

Compiled 70 to 47 computations (32.9% saved)

bsearch126.0ms (0.6%)

Memory
34.3MiB live, 189.0MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
50.0ms
-9.608646767068282e-307
4.446012017221943e-307
66.0ms
-7.642095293820367e-61
-2.59338093686431e-62
Samples
57.0ms239×0invalid
40.0ms240×0valid
Compiler

Compiled 1 309 to 854 computations (34.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 55.0ms
ival-div: 17.0ms (30.9% of total)
ival-mult: 15.0ms (27.3% of total)
ival-pow: 15.0ms (27.3% of total)
ival-pow2: 5.0ms (9.1% of total)
ival-sub: 2.0ms (3.6% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory
8.1MiB live, 8.1MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-9.608646767068282e-307
4.446012017221943e-307
1.0ms
-7.642095293820367e-61
-2.59338093686431e-62
Compiler

Compiled 1 294 to 839 computations (35.2% saved)

bsearch34.0ms (0.2%)

Memory
-41.3MiB live, 43.5MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-9.608646767068282e-307
4.446012017221943e-307
25.0ms
-5.733306487690676e-131
-3.395737141392473e-131
Samples
11.0ms63×0invalid
10.0ms64×0valid
Compiler

Compiled 1 087 to 722 computations (33.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 17.0ms
ival-pow: 6.0ms (36% of total)
ival-div: 4.0ms (24% of total)
ival-mult: 4.0ms (24% of total)
ival-sub: 1.0ms (6% of total)
ival-pow2: 1.0ms (6% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory
5.1MiB live, 5.1MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-9.608646767068282e-307
4.446012017221943e-307
1.0ms
-7.642095293820367e-61
-2.59338093686431e-62
Compiler

Compiled 1 339 to 884 computations (34% saved)

bsearch2.0ms (0%)

Memory
3.0MiB live, 3.0MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-9.608646767068282e-307
4.446012017221943e-307
Compiler

Compiled 723 to 478 computations (33.9% saved)

bsearch67.0ms (0.3%)

Memory
12.3MiB live, 88.8MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
61.0ms
1.972326120389635e-305
1.7560019188440774e-302
Samples
37.0ms128×0valid
16.0ms113×0invalid
Compiler

Compiled 699 to 454 computations (35.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 30.0ms
ival-div: 11.0ms (36.5% of total)
ival-mult: 8.0ms (26.5% of total)
ival-pow: 8.0ms (26.5% of total)
ival-pow2: 2.0ms (6.6% of total)
ival-sub: 1.0ms (3.3% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch62.0ms (0.3%)

Memory
-0.6MiB live, 119.2MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
56.0ms
1.4469457909957769e-183
8.027231160832187e-177
Samples
22.0ms144×0valid
21.0ms133×0invalid
Compiler

Compiled 781 to 507 computations (35.1% saved)

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

bsearch56.0ms (0.3%)

Memory
6.5MiB live, 126.9MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
51.0ms
1.1955420313597068e-272
2.025330893253045e-269
Samples
21.0ms116×0invalid
21.0ms128×0valid
Compiler

Compiled 667 to 446 computations (33.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 32.0ms
ival-pow: 9.0ms (27.9% of total)
ival-div: 8.0ms (24.8% of total)
ival-mult: 8.0ms (24.8% of total)
ival-pow2: 5.0ms (15.5% of total)
ival-sub: 1.0ms (3.1% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
2.4MiB live, 2.4MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.4821241614775106e+282
+inf
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
2.4MiB live, 2.4MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.4821241614775106e+282
+inf
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch47.0ms (0.2%)

Memory
-1.7MiB live, 112.9MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
43.0ms
6.149491990828483e+72
4.0352897551585747e+74
Samples
21.0ms112×0valid
12.0ms103×0invalid
Compiler

Compiled 554 to 359 computations (35.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 26.0ms
ival-div: 9.0ms (35% of total)
ival-mult: 8.0ms (31.1% of total)
ival-pow: 5.0ms (19.5% of total)
ival-pow2: 2.0ms (7.8% of total)
ival-sub: 1.0ms (3.9% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
3.2MiB live, 3.2MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.4821241614775106e+282
+inf
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch188.0ms (0.9%)

Memory
5.8MiB live, 408.8MiB allocated
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
66.0ms
-8.522443999839596e-285
-2.7630881632972483e-303
46.0ms
-4.156641343714972e-148
-9.722202513440089e-152
57.0ms
-5.622833430897417e+155
-5.151145277772253e+150
Samples
70.0ms432×0valid
68.0ms482×0invalid
Compiler

Compiled 1 789 to 1 145 computations (36% saved)

Precisions
Click to see histograms. Total time spent on operations: 104.0ms
ival-div: 40.0ms (38.3% of total)
ival-mult: 30.0ms (28.7% of total)
ival-pow: 19.0ms (18.2% of total)
ival-pow2: 9.0ms (8.6% of total)
ival-sub: 4.0ms (3.8% of total)
ival-true: 1.0ms (1% of total)
exact: 1.0ms (1% of total)
ival-assert: 0.0ms (0% of total)

bsearch184.0ms (0.9%)

Memory
1.7MiB live, 285.8MiB allocated
Algorithm
6×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
29.0ms
5.8727983348064524e+110
1.1725422674810378e+111
89.0ms
0.00021801221456613137
103756870.05541968
47.0ms
9.841429846223571e-163
3.4429020946212898e-155
1.0ms
-8.522443999839596e-285
-2.7630881632972483e-303
3.0ms
-4.156641343714972e-148
-9.722202513440089e-152
1.0ms
-5.622833430897417e+155
-5.151145277772253e+150
Samples
78.0ms368×0valid
63.0ms317×0invalid
Compiler

Compiled 3 229 to 2 057 computations (36.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 118.0ms
ival-mult: 46.0ms (39.1% of total)
ival-pow: 35.0ms (29.8% of total)
ival-div: 24.0ms (20.4% of total)
ival-pow2: 8.0ms (6.8% of total)
ival-sub: 3.0ms (2.6% of total)
exact: 1.0ms (0.9% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch16.0ms (0.1%)

Memory
-24.8MiB live, 14.1MiB allocated
Algorithm
5×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
0.0ms
5.8727983348064524e+110
1.1725422674810378e+111
1.0ms
0.00021801221456613137
103756870.05541968
1.0ms
-8.522443999839596e-285
-2.7630881632972483e-303
1.0ms
-4.156641343714972e-148
-9.722202513440089e-152
12.0ms
-5.622833430897417e+155
-5.151145277772253e+150
Compiler

Compiled 2 615 to 1 679 computations (35.8% saved)

bsearch1.0ms (0%)

Memory
2.0MiB live, 2.0MiB allocated
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
1.4821241614775106e+282
+inf
0.0ms
-4.766566144186409e-53
-9.518814031864492e-125
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch255.0ms (1.2%)

Memory
25.4MiB live, 305.3MiB allocated
Algorithm
4×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
84.0ms
2.461841512008412e-56
8.591148013033398e-51
1.0ms
-8.522443999839596e-285
-2.7630881632972483e-303
126.0ms
-1.7355739290707504e-126
-2.62573151903957e-133
30.0ms
-5.622833430897417e+155
-5.151145277772253e+150
Samples
113.0ms320×0valid
88.0ms345×0invalid
Compiler

Compiled 2 197 to 1 422 computations (35.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 147.0ms
ival-mult: 71.0ms (48.2% of total)
ival-div: 31.0ms (21.1% of total)
ival-pow2: 28.0ms (19% of total)
ival-pow: 14.0ms (9.5% of total)
ival-sub: 3.0ms (2% of total)
ival-true: 1.0ms (0.7% of total)
exact: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)

bsearch12.0ms (0.1%)

Memory
-36.7MiB live, 2.1MiB allocated
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
1.4821241614775106e+282
+inf
0.0ms
-4.766566144186409e-53
-9.518814031864492e-125
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
1.4821241614775106e+282
+inf
0.0ms
-2.0882480531047946e+73
-3.490742172922416e+57
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
1.4821241614775106e+282
+inf
0.0ms
-4.766566144186409e-53
-9.518814031864492e-125
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory
1.7MiB live, 1.7MiB allocated
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
1.4821241614775106e+282
+inf
0.0ms
-4.362919172236486e+280
-4.417251292673373e+249
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
1.4821241614775106e+282
+inf
0.0ms
0.0
2.4948964827819332e-275
Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch70.0ms (0.3%)

Memory
4.1MiB live, 162.1MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-9.608646767068282e-307
4.446012017221943e-307
62.0ms
-251184673.2628648
-0.13020067168697072
Samples
29.0ms153×0invalid
24.0ms144×0valid
Compiler

Compiled 571 to 413 computations (27.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 42.0ms
ival-mult: 16.0ms (37.8% of total)
ival-pow: 11.0ms (26% of total)
ival-div: 10.0ms (23.7% of total)
ival-pow2: 3.0ms (7.1% of total)
ival-sub: 1.0ms (2.4% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch40.0ms (0.2%)

Memory
31.7MiB live, 109.8MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
36.0ms
3.4429020946212898e-155
1.8498095920849333e-154
Samples
17.0ms96×0valid
13.0ms107×0invalid
Compiler

Compiled 223 to 162 computations (27.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 23.0ms
ival-div: 8.0ms (35.5% of total)
ival-mult: 6.0ms (26.7% of total)
ival-pow: 5.0ms (22.2% of total)
ival-pow2: 2.0ms (8.9% of total)
ival-sub: 1.0ms (4.4% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch9.0ms (0%)

Memory
-45.3MiB live, 2.5MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
3.4429020946212898e-155
1.8498095920849333e-154
Compiler

Compiled 217 to 156 computations (28.1% saved)

bsearch50.0ms (0.2%)

Memory
18.0MiB live, 95.3MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
46.0ms
-6.559775811197748e-155
-6.752612137537847e-157
Samples
19.0ms120×0invalid
19.0ms112×0valid
Compiler

Compiled 239 to 163 computations (31.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 28.0ms
ival-div: 9.0ms (32.5% of total)
ival-mult: 7.0ms (25.3% of total)
ival-pow: 7.0ms (25.3% of total)
ival-pow2: 2.0ms (7.2% of total)
ival-sub: 1.0ms (3.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
8.2MiB live, 89.1MiB allocated
Algorithm
1×egg-herbie
Rules
340×*-commutative_binary64
162×sub-neg_binary64
160×+-commutative_binary64
142×neg-sub0_binary64
142×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03193724
14803724
26313724
37883724
49123724
59923724
610353724
710503724
810553724
Stop Event
1×saturated
Calls
Call 1
Inputs
(if (<=.f64 h #s(literal -1628326254899759/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))))))
(if (<=.f64 h #s(literal -1628326254899759/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))))))
(if (<=.f64 h #s(literal -2797086701083129/49947976805055875702105555676690660891977570282639538413746511354005947821116249921924897649015871538557230897942505966327167610868612564900642816 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))))))
(if (<=.f64 h #s(literal -1628326254899759/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))))))
(if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l)))))
(if (<=.f64 l #s(literal 3459022883669859/98829225247710262867429368515096341332791332892647518728955741224331220492185227974590031104217345944915565363435943316108305047551656971126471386689813725547615929822542168634993607295943953291620980311754270053008792716515963231747120779125566189619536160406425180445475300105093018814544105228831057745755716670455808 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l)))))
(if (<=.f64 l #s(literal 5588989756587189/2281220308811097609320585802850145662446614253624279965289596258949637583604338693252956405658685699889321154786797203655344352360687718999126330659861107094125997337180132475041437096123301888 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))))))
(if (<=.f64 l #s(literal 8222608697118749/609082125712499942522086399242199269429764178599687970429244153575809293172901631404100941617625641201581557264463041761466198116575193377911124206019540838720704856247279564366924353468128353022049974592451148679605349870337179684109147725966810350801733675194017346692614286874494631936 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) l)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (/.f64 l h))))) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) l)))) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 h)))
(if (<=.f64 d #s(literal 120000000000000004241145350782039859599498386095882291964416894858835263488 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) l)))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h 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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 h (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -101999999999999998112099972223808042168996031756788934055833815818951472990672313788201237905287166446205186812816200586527989285559745572604987448441700352 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 d #s(literal -8476673415126509/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))))))
(if (<=.f64 d #s(literal -101999999999999998112099972223808042168996031756788934055833815818951472990672313788201237905287166446205186812816200586527989285559745572604987448441700352 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 d #s(literal -8476673415126509/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (if (<=.f64 d #s(literal 8307135660357457/2026130648867672343023636652192949780767796011837127392576004555513014068072709055859231957493703024554784124321924213467966382361040905912054138102594708831572842677442143322112 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h)))) (if (<=.f64 d #s(literal 98000 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) l))) (if (<=.f64 d #s(literal 900000000000000054587228199017450287346793674450445467484179447164153032042070681560661640755713153344865304576 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))))
(if (<=.f64 d #s(literal -101999999999999998112099972223808042168996031756788934055833815818951472990672313788201237905287166446205186812816200586527989285559745572604987448441700352 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 d #s(literal -8476673415126509/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (if (<=.f64 d #s(literal 98000 binary64)) (/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))) (sqrt.f64 h)) (if (<=.f64 d #s(literal 900000000000000054587228199017450287346793674450445467484179447164153032042070681560661640755713153344865304576 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.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 -8627182933488205/215679573337205118357336120696157045389097155380324579848828881993728 binary64)) (*.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -93999999999999996625667040833419900365136561049208154209289587627129128098000995772868617772531682206616559920436188637923204283173580922965059186160828416 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 d #s(literal -7316598164803107/48777321098687378615337456715518223527321845979140174232174327494146433419058837814379782860367062049372295798771978482741374619988879457910784 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l))))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (if (<=.f64 d #s(literal 6402987333448277/1684996666696914987166688442938726917102321526408785780068975640576 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.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 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 -8627182933488205/215679573337205118357336120696157045389097155380324579848828881993728 binary64)) (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l))))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 -19999999999999999660673935899226515960618160481369312643676908399133458432 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h 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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 -8627182933488205/215679573337205118357336120696157045389097155380324579848828881993728 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 -40000000000000001311289839314483929942828211320859742570533343097637704127894973437117375146896471722152699903272966032748065387076427827839759644051721700844991152169824802632610930894205983859613141956500412025163704055697793426085237942593040184883151427072434204228050588008448 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 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -250000000 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 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 d #s(literal 6642173867685913/120766797594289323271729746591624604509341479053326093708038601607859973196548763266756055205685080561326988000984443036792658708157593364241965896045846273396780650463232 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 d #s(literal 6642173867685913/120766797594289323271729746591624604509341479053326093708038601607859973196548763266756055205685080561326988000984443036792658708157593364241965896045846273396780650463232 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 (sqrt.f64 (*.f64 l h)))))
(if (<=.f64 l #s(literal -1255974694980609/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))) #s(approx (* (* (pow (/ d 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 l h))))
Outputs
(if (<=.f64 h #s(literal -1628326254899759/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))))))
(if (<=.f64 h #s(literal -1628326254899759/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.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))) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 d))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 D l) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -1628326254899759/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))))))
(if (<=.f64 h #s(literal -1628326254899759/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 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 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 D l) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -2797086701083129/49947976805055875702105555676690660891977570282639538413746511354005947821116249921924897649015871538557230897942505966327167610868612564900642816 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))))))
(if (<=.f64 h #s(literal -2797086701083129/49947976805055875702105555676690660891977570282639538413746511354005947821116249921924897649015871538557230897942505966327167610868612564900642816 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 d)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 D l) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -1628326254899759/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 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) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l))))))
(if (<=.f64 h #s(literal -1628326254899759/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 D l) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l)))))
(if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 d h)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 D l) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 3459022883669859/98829225247710262867429368515096341332791332892647518728955741224331220492185227974590031104217345944915565363435943316108305047551656971126471386689813725547615929822542168634993607295943953291620980311754270053008792716515963231747120779125566189619536160406425180445475300105093018814544105228831057745755716670455808 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) M)) (/.f64 D l)))))
(if (<=.f64 l #s(literal 3459022883669859/98829225247710262867429368515096341332791332892647518728955741224331220492185227974590031104217345944915565363435943316108305047551656971126471386689813725547615929822542168634993607295943953291620980311754270053008792716515963231747120779125566189619536160406425180445475300105093018814544105228831057745755716670455808 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 D l) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)) (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 5588989756587189/2281220308811097609320585802850145662446614253624279965289596258949637583604338693252956405658685699889321154786797203655344352360687718999126330659861107094125997337180132475041437096123301888 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (/.f64 #s(literal 1 binary64) h))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))))))
(if (<=.f64 l #s(literal 5588989756587189/2281220308811097609320585802850145662446614253624279965289596258949637583604338693252956405658685699889321154786797203655344352360687718999126330659861107094125997337180132475041437096123301888 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 M d) (*.f64 (*.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) h)) (/.f64 (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 l d)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 8222608697118749/609082125712499942522086399242199269429764178599687970429244153575809293172901631404100941617625641201581557264463041761466198116575193377911124206019540838720704856247279564366924353468128353022049974592451148679605349870337179684109147725966810350801733675194017346692614286874494631936 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) l)))) (*.f64 (*.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)) (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))))))
(if (<=.f64 l #s(literal 8222608697118749/609082125712499942522086399242199269429764178599687970429244153575809293172901631404100941617625641201581557264463041761466198116575193377911124206019540838720704856247279564366924353468128353022049974592451148679605349870337179684109147725966810350801733675194017346692614286874494631936 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)) l) (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 l d)) (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d)) (/.f64 (sqrt.f64 d) (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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (/.f64 l h))))) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (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 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)))))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (/.f64 l h)) (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) l)))) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) #s(literal 1/8 binary64)) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (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 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)))))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)) l) (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) D) M))) (sqrt.f64 d)) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 h)))
(if (<=.f64 d #s(literal 120000000000000004241145350782039859599498386095882291964416894858835263488 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (/.f64 (*.f64 (*.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) l)))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))))
(if (<=.f64 d #s(literal 120000000000000004241145350782039859599498386095882291964416894858835263488 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) D) (*.f64 (/.f64 M d) h)) l) (*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d))))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) D) (*.f64 (/.f64 M d) D)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 h l))) (/.f64 d (sqrt.f64 (*.f64 l 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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D) (*.f64 h (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 d l)))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 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)))))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) (*.f64 l d)) h) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 M d)) D))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -101999999999999998112099972223808042168996031756788934055833815818951472990672313788201237905287166446205186812816200586527989285559745572604987448441700352 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 d #s(literal -8476673415126509/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D (/.f64 M d)) (*.f64 D (/.f64 M d))))) (/.f64 h l)))))))
(if (<=.f64 d #s(literal -101999999999999998112099972223808042168996031756788934055833815818951472990672313788201237905287166446205186812816200586527989285559745572604987448441700352 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d))) (if (<=.f64 d #s(literal -8476673415126509/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 (neg.f64 D) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 M d)) M)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 M d) D) (*.f64 (/.f64 M d) D)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 h l))) (/.f64 d (sqrt.f64 (*.f64 l h)))))))
(if (<=.f64 d #s(literal -101999999999999998112099972223808042168996031756788934055833815818951472990672313788201237905287166446205186812816200586527989285559745572604987448441700352 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 d #s(literal -8476673415126509/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (if (<=.f64 d #s(literal 8307135660357457/2026130648867672343023636652192949780767796011837127392576004555513014068072709055859231957493703024554784124321924213467966382361040905912054138102594708831572842677442143322112 binary64)) (*.f64 (/.f64 d (sqrt.f64 (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h)))) (if (<=.f64 d #s(literal 98000 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 D D)) (/.f64 (*.f64 M M) (*.f64 d d))) h) l))) (if (<=.f64 d #s(literal 900000000000000054587228199017450287346793674450445467484179447164153032042070681560661640755713153344865304576 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))))
(if (<=.f64 d #s(literal -101999999999999998112099972223808042168996031756788934055833815818951472990672313788201237905287166446205186812816200586527989285559745572604987448441700352 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d))) (if (<=.f64 d #s(literal -8476673415126509/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 (neg.f64 D) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 M d)) M)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (if (<=.f64 d #s(literal 8307135660357457/2026130648867672343023636652192949780767796011837127392576004555513014068072709055859231957493703024554784124321924213467966382361040905912054138102594708831572842677442143322112 binary64)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 #s(literal -1/8 binary64) h) (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 D M)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) (if (<=.f64 d #s(literal 98000 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 (*.f64 D D) #s(literal 1/8 binary64))) h) l)) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 d #s(literal 900000000000000054587228199017450287346793674450445467484179447164153032042070681560661640755713153344865304576 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))))
(if (<=.f64 d #s(literal -101999999999999998112099972223808042168996031756788934055833815818951472990672313788201237905287166446205186812816200586527989285559745572604987448441700352 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 d #s(literal -8476673415126509/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (if (<=.f64 d #s(literal 98000 binary64)) (/.f64 (*.f64 (/.f64 d (sqrt.f64 l)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.f64 h l) #s(literal 1 binary64))) (sqrt.f64 h)) (if (<=.f64 d #s(literal 900000000000000054587228199017450287346793674450445467484179447164153032042070681560661640755713153344865304576 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))))
(if (<=.f64 d #s(literal -101999999999999998112099972223808042168996031756788934055833815818951472990672313788201237905287166446205186812816200586527989285559745572604987448441700352 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d))) (if (<=.f64 d #s(literal -8476673415126509/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 (neg.f64 D) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 M d)) M)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (if (<=.f64 d #s(literal 98000 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #s(literal -1/8 binary64)) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h)) (if (<=.f64 d #s(literal 900000000000000054587228199017450287346793674450445467484179447164153032042070681560661640755713153344865304576 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 -8627182933488205/215679573337205118357336120696157045389097155380324579848828881993728 binary64)) (*.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -8627182933488205/215679573337205118357336120696157045389097155380324579848828881993728 binary64)) (*.f64 (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 #s(literal -1/8 binary64) h) (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 D M)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -93999999999999996625667040833419900365136561049208154209289587627129128098000995772868617772531682206616559920436188637923204283173580922965059186160828416 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 d #s(literal -7316598164803107/48777321098687378615337456715518223527321845979140174232174327494146433419058837814379782860367062049372295798771978482741374619988879457910784 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l))))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 D (*.f64 (neg.f64 M) (*.f64 (/.f64 M d) #s(literal -1/8 binary64)))) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (if (<=.f64 d #s(literal 6402987333448277/1684996666696914987166688442938726917102321526408785780068975640576 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D))) (/.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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -93999999999999996625667040833419900365136561049208154209289587627129128098000995772868617772531682206616559920436188637923204283173580922965059186160828416 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d))) (if (<=.f64 d #s(literal -7316598164803107/48777321098687378615337456715518223527321845979140174232174327494146433419058837814379782860367062049372295798771978482741374619988879457910784 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M)))) (sqrt.f64 (/.f64 h (*.f64 (/.f64 d l) d)))) (if (<=.f64 d #s(literal -1080944651146831/386051661123868214325895970762095083331216144111904370034983364157543830047598546775742309000849007597326427200921653578548066591998660043462778854257084865420374725869305346230443778499781067545394454342790117394565596548890481374012190543459242928201313126587598361115137891035519604744312911050121319319358268243968 binary64)) #s(approx (/ (* (sqrt d) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l)))) (sqrt h)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))) D) (*.f64 (neg.f64 D) (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 M d)) M)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 l h))))) (if (<=.f64 d #s(literal 6402987333448277/1684996666696914987166688442938726917102321526408785780068975640576 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (*.f64 D D)) #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 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 -8627182933488205/215679573337205118357336120696157045389097155380324579848828881993728 binary64)) (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 M D)) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 h (*.f64 d (/.f64 d l))))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -8627182933488205/215679573337205118357336120696157045389097155380324579848828881993728 binary64)) (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 #s(literal -1/8 binary64) h) (*.f64 (*.f64 (/.f64 D (*.f64 (*.f64 d d) l)) M) (*.f64 D M)))) (sqrt.f64 (/.f64 h (*.f64 (/.f64 d l) d)))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 -19999999999999999660673935899226515960618160481369312643676908399133458432 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 M D)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 h 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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -19999999999999999660673935899226515960618160481369312643676908399133458432 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 D (*.f64 (*.f64 d d) l))) h) M) (*.f64 D M))))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 -8627182933488205/215679573337205118357336120696157045389097155380324579848828881993728 binary64)) (*.f64 (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 h #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l)))))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -8627182933488205/215679573337205118357336120696157045389097155380324579848828881993728 binary64)) (*.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (*.f64 (*.f64 (*.f64 (*.f64 M M) D) (/.f64 D (*.f64 (*.f64 d d) l))) (*.f64 #s(literal -1/8 binary64) h))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l 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 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)))))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 -40000000000000001311289839314483929942828211320859742570533343097637704127894973437117375146896471722152699903272966032748065387076427827839759644051721700844991152169824802632610930894205983859613141956500412025163704055697793426085237942593040184883151427072434204228050588008448 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 M M)) (/.f64 (*.f64 D D) d)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) 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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -40000000000000001311289839314483929942828211320859742570533343097637704127894973437117375146896471722152699903272966032748065387076427827839759644051721700844991152169824802632610930894205983859613141956500412025163704055697793426085237942593040184883151427072434204228050588008448 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 D D) d) (*.f64 (*.f64 M M) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (*.f64 (*.f64 l l) l))))) (if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 (*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 h l) (*.f64 (pow.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) (*.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d l))) (neg.f64 (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 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)))))) #s(literal 2000000000000000065564491965724196497141410566042987128526667154881885206394748671855868757344823586107634995163648301637403269353821391391987982202586085042249557608491240131630546544710299192980657097825020601258185202784889671304261897129652009244157571353621710211402529400422400 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -250000000 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 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 h #s(literal -250000000 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal 6642173867685913/120766797594289323271729746591624604509341479053326093708038601607859973196548763266756055205685080561326988000984443036792658708157593364241965896045846273396780650463232 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 d #s(literal 6642173867685913/120766797594289323271729746591624604509341479053326093708038601607859973196548763266756055205685080561326988000984443036792658708157593364241965896045846273396780650463232 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal 6642173867685913/120766797594289323271729746591624604509341479053326093708038601607859973196548763266756055205685080561326988000984443036792658708157593364241965896045846273396780650463232 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 (sqrt.f64 (*.f64 l h)))))
(if (<=.f64 d #s(literal 6642173867685913/120766797594289323271729746591624604509341479053326093708038601607859973196548763266756055205685080561326988000984443036792658708157593364241965896045846273396780650463232 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d 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)))))
(if (<=.f64 l #s(literal -1255974694980609/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (*.f64 d d) (*.f64 l h)))) #s(approx (* (* (pow (/ d 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 l h))))

soundness2.7s (13.3%)

Memory
31.2MiB live, 2 199.6MiB allocated
Rules
11 250×lower-*.f64
11 250×lower-*.f32
8 210×lower-*.f64
8 210×lower-*.f32
7 146×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
029717472
188917110
2325517008
3715916915
0846616630
085428
0138401
1435365
22917345
08759339
017310867
150010758
2180710718
3429510690
0844710564
0341972
1741940
22561940
311811940
432731940
535071940
635941940
736201940
836371940
936431940
1047531940
1148231940
1248321940
1348321940
1457471940
1573301940
1673481940
1773481940
1873481940
1973481940
0107911940
082457
0139439
1387418
22223402
08327398
01942
03240
19440
251540
3505840
0812140
064238
0111232
1349224
22280222
08387220
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
Compiler

Compiled 11 923 to 4 260 computations (64.3% saved)

preprocess215.0ms (1%)

Memory
-1.8MiB live, 277.8MiB allocated
Remove

(abs M)

(abs D)

(sort M D)

Compiler

Compiled 6 286 to 1 280 computations (79.6% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...